可以改为使用表格替代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"))
Next
If Lst.Items.Count > 0 Then
lst.SelectedIndex = 0
End If
加好友 
发短信
Post By：2020/7/15 14:01:00 [显示全部帖子]
