Visual Basic 6 中的多列组合框
Multi-Column Combo box In visual Basic 6
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 组合框相关问题。我必须使用此代码显示一个数据列。但我想显示两个数据列。例如:- 带有员工工号的员工姓名。
您应该能够将列连接成一个字符串并将其与组合框一起使用:
.AddItem CStr(rst![referance_no]) & ", " & CStr(rst![ship_mode])
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 组合框相关问题。我必须使用此代码显示一个数据列。但我想显示两个数据列。例如:- 带有员工工号的员工姓名。
您应该能够将列连接成一个字符串并将其与组合框一起使用:
.AddItem CStr(rst![referance_no]) & ", " & CStr(rst![ship_mode])