如何建立数据库关联的combo box.txt

来自「VB技巧问答10000例 VB技巧问答10000例」· 文本 代码 · 共 12 行

你 应 该 使 用 DBCombo而 不 是 Combo。 如 果 使 用 Combo， 只 有 一 条 记 录 ， 而 不 会 自 动 将 数 据 库 中 的 内 容 都 填 充 到 Combo中 去 。 DBCombo的 使 用 方 法 参 考 QA000274 “使用绑定的DBCombo时，如何使对应的data控件也能同步变动”。 
    如 果 你 一 定 要 使 用 Combo， 必 须 手 工 编 写 读 数 据 库 的 代 码 ， 如 ： 
    While Not Data1.Recordset.Eof 
     Combo1.AddItem Data1.Recordset("地 址 ") 
     Data1.Recordset.MoveNext 
    Wend 
    如 果 要 保 存 Combo1.Text， 可 以 ： 
    Data2.Recordset.AddNew 
    Data2.Recordset("地 址 ") = Combo1.Text 
    Data2.Update 
<END>