Question

好的，我的网站连接到mysql数据库，它从数据库中读取数据字符串为纯文本。我想从我的网站上获取每一行并将其添加到列表框中。

这是我到目前为止所做的。

Dim GetInfo As String = WBInfo.DownloadString("https://MyWebsite.com/test.php?id=data")

GetInfo输出如：
用户1：用户2：用户3
用户2：用户3：USER4
用户3：USER4：USER5
等。

For Each line In GetInfo
    Dim parts As String() = line.ToString.Split(New Char() {":"c})
    ListBox1.Items.Add(parts(1))
    ListBox1.Items.Add(parts(2))
    ListBox1.Items.Add(parts(3))
Next

Answer 1

首先，使用

Dim parts As String() = line.ToString.Split(":"c)

注意，数组的索引从0开始。另外，您可以使用For Each循环语句而不是索引，例如：

For Each part As String In parts
    ListBox1.Items.Add(part)
Next

要在使用BeginUpdate()和EndUpdate()方法将项目添加到ListBox时保持性能。

如何将每行从字符串添加到listbox vb.net

1 个答案: