VB列表框属性的问题

Posted 2023-04-14

请问列表框LIST的list属性和text属性有什么区别？List2.AddItem List1.List(k)和List2.AddItem List1.text 这两个语句有什么不同？程序执行的结果是一样的。

参考技术A 我给你说具体点吧，List
属性是返回或设置控件的列表部分的项目。列表是一个字符串数组，数组的每一项都是一列表项目，对
ListBox
和
ComboBox
控件在设计时可以通过属性浏览器得到，对
DirListBox、DriveListBox
和
FileListBox
控件在运行时是只读的，对
ComboBox
和
ListBox
控件在运行时是可读写的。List
属性和
ListCount、ListIndex
属性结合起来使用。List2.AddItem
List1.List(k)和List2.AddItem
List1.text
返回值总与表达式List(ListIndex)的返回值相同。

在列表框中显示表名 (VB)

【中文标题】在列表框中显示表名 (VB)

【英文标题】：Displaying Table names in a listbox (VB)

【发布时间】：2021-11-23 13:57:13

【问题描述】：

您好，我想知道如何在列表框中显示表名的语法？

我正在使用带有 LocalDB 的 Visual Studio (vb) 并尝试使用 Windows 窗体创建一个程序，该程序可以在我的数据库中创建一个表并在列表框（或任何类似于列表框的东西）中显示表的名称

【问题讨论】：

如何获取表名？

select name from sys.tables 也许？

我还想知道是否有另一种方法可以让所有表名显示在列表框中，或者我正在考虑有一个单独的表或列来存储表名但我认为它会占用额外的空间？

【参考方案1】：

这取决于您使用的 Sql Server 版本。这应该适用于 2005 年及更高版本。

Private ConLocal As String = "Your connection string"

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim sql = "Select TABLE_NAME
                FROM INFORMATION_SCHEMA.TABLES
                WHERE TABLE_TYPE = 'BASE TABLE';"
    Dim dt As New DataTable
    Using cn As New SqlConnection(ConLocal),
            cmd As New SqlCommand(sql, cn)
        cn.Open()
        Using reader = cmd.ExecuteReader
            dt.Load(reader)
        End Using
    End Using
    For Each row As DataRow In dt.Rows
        ListBox1.Items.Add(row(0))
    Next
End Sub

【讨论】：

这个解决了我的问题，谢谢！