以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  ListBox1如何同时显示两列值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=128592)

--  作者:pzhwjx
--  发布时间:2018/12/11 12:48:00
--  ListBox1如何同时显示两列值
Dim lst As WinForm.ListBox = e.Form.Controls("ListBox1")
lst.ComboList = _UserTable.SQLGetComboListString("工号")
If Lst.Items.Count > 0 Then
    lst.SelectedIndex = 0
End If


我要同时显示工号和姓名,代码怎么写

--  作者:有点甜
--  发布时间:2018/12/11 15:05:00
--  

Dim lst As WinForm.ListBox = e.Form.Controls("ListBox1")
For Each dr As DataRow In _UserTable.SQLselect("")
    lst.Items.Add(dr("工号") & "," & dr("姓名"))
Next
If Lst.Items.Count > 0 Then
    lst.SelectedIndex = 0
End If

--  作者:pzhwjx
--  发布时间:2018/12/11 18:05:00
--  
非常感谢有点甜