- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 【求助】窗口中的列表框显示多列字段问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=152571)
-- 发布时间：2020/7/15 13:58:00
-- 【求助】窗口中的列表框显示多列字段问题
求助：
此主题相关图片如下：tim图片20200715135259.png
-- 发布时间：2020/7/15 14:01:00
--
可以改为使用表格替代listbox
listbox只能合并显示，比如：
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim lst As WinForm.ListBox = e.Form.Controls("ListBox1")
cmd.ConnectionName = "User"
cmd.CommandText = "SELECT DISTINCT Name,group,xxname From {Users}"
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.Datarows
lst.Items.Add(dr("Name") & "-" & dr("group") & "-" & dr("xxname"))
Dim dt As DataTable
Dim lst As WinForm.ListBox = e.Form.Controls("ListBox1")
cmd.ConnectionName = "User"
cmd.CommandText = "SELECT DISTINCT Name,group,xxname From {Users}"
dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.Datarows
lst.Items.Add(dr("Name") & "-" & dr("group") & "-" & dr("xxname"))
Next
If Lst.Items.Count > 0 Then
lst.SelectedIndex = 0
End If
If Lst.Items.Count > 0 Then
lst.SelectedIndex = 0
End If
-- 发布时间：2020/8/26 9:04:00
--
搞定了，谢谢老师