Call dbConnect
Dim rst As New ADODB.Recordset
rst.Open "SELECT referance_no,ship_mode FROM pre_mst_header ", connect, adOpenStatic
rst.MoveFirst
With Me.Combo1
.clear
Do
.AddItem rst![referance_no]
rst.MoveNext
Loop Until rst.EOF
End With
connect.Close
关于Vb6组合框相关问题。我必须使用此代码显示一个数据列。但我想显示两个数据列。例如: - 员工姓名和员工ID号。
答案 0 :(得分:1)
您应该能够将列连接成一个字符串,并将其与组合框一起使用:
.AddItem CStr(rst![referance_no]) & ", " & CStr(rst![ship_mode])