新手刚接触，求帮助！
 Private Sub Form_Load()
        Dim strSQL2 As String
    Dim rs As New ADODB.Recordset
    strSQL2 = "SELECT * FROM [tb_department] ORDER BY department_id"
   
    Set rs = QueryExt(strSQL2)  '读取所有记录
    i = 0
    With cmbDept
    Do While Not rs.EOF    '将部门数据添加到给合控件中
        .AddItem rs("department_name")
       .ItemData(i) = rs("department_id")
        rs.MoveNext
        i = i + 1
   Loop

我用数据库里面一张表的一列，让它显示在combo里面，另外需要点击combo选择里面某个记录时候，在txtbox中显示同一数据表中的另外一个字段的值，不知道该怎么样出来？非常感谢了啊！

版主详细点啊，是在这个下面写个什么代码才能出来？万分感谢啊！

我现在combo里面下拉可以得出数据库中的一列，但是文本怎么样查询和更新啊

郁闷，谁帮帮忙 啊

灰常感谢楼上大神！！