比如说我有个mdb数据库
两个字段
节目
地址
我把字段一的"节目"
Do While Data1.Recordset.EOF = False
If Data1.Recordset.Fields("节目") <> "" Then

Combo1.AddItem Data1.Recordset.Fields("节目")
Data1.Recordset.MoveNext
End If
Loop
把"节目"添加到了combo1中
那么，着么样选择字段一中的数据，然后在text1.text中显示和第一个字段相应的第二个字段的值
就是说
节目 地址
cctv1 mms

然后，我选中cctv
就要在text1.text中显示mms