怎样将Combobox和Textbox通过一张表关联起来
有一张字段为编号,材料名称,密度的一张表。我想通过Combobox和Textbox实现关联,也就是当通过Combobox选择一种材料时,Textbox将会出现它的密度值。谢谢 --------------------编程问答-------------------- 在Combo1_Click作处理过程就可以了可以根据
Combo1.ListIndex
Combo1.List
Combo1.ItemData
等属性作关键参数进行处理 --------------------编程问答--------------------
combobox对于数据表的使用并不方便,你需要使用additem来添加列表。
建议你使用datacombo来与textbox实现关联,才好实现你的要求。
工程-- 部件-- 添加microsoft datalist controls 6.0
DataCombo1.Style选择 dbcDropdownList
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
"C:\Documents and Settings\Administrator\My Documents\11.mdb;Persist Security Info=False"
Adodc1.CursorLocation = adUseClient
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from itb2"
Adodc1.Refresh
Set DataCombo1.DataSource = Adodc1
Set DataCombo1.RowSource = Adodc1
DataCombo1.ListField = Adodc1.Recordset.Fields(1).Name
DataCombo1.Text = DataCombo1.BoundColumn
Text1.Locked = True
Set Text1.DataSource = Adodc1
Text1.DataField = Adodc1.Recordset.Fields(2).Name
End Sub
Private Sub DataCombo1_Change()
If IsNull(DataCombo1.SelectedItem) Then Exit Sub
Adodc1.Recordset.Move DataCombo1.SelectedItem - 1, 1
End Sub
补充:VB , 控件