Question

我想知道如何拿一个我的文本框或字符串并将其放在列表视图中..好吧，不要让我告诉你想要继续。

我有一个包含以下内容的2个文本框

TextBox1中

 cat123
 hatcat
 quanwall
 samiam12

TextBox2中

 John
 will
 sam
 dan

我想获取TextBox1的文本并将其放在ListView的其中一列中。例如。 ListView有2列表示用户名和实名，TextBox1是用户名，TextBox2是实名。所以我想让TextBox1中的每一行与ListView中的RealNames（TextBox2）匹配。

iv bin使用

        Dim Q As New ListViewItem
        Q.Text = Host
        Q.SubItems.Add(User)
        Q.SubItems.Add(Pass)
        ListView1.Items.Add(Q)

将字符串添加到listview

我尽快需要这些信息，你好＆lt; 3

Answer 1

虽然您问题的直截了当的答案很简单，但您发布的问题会引发问题。您可以互换使用Listbox和Listview，但它们是两个不同的控件。此外，您似乎建议您的文本框包含多个值，其中文本框的意图是保存一个不同的值或文本字符串。

由于这些控件是Windows窗体控件，因此可能不需要使用“Dim Q As New ListviewItem”。

我建议您阅读更多有关您要使用的控件，如何使用以及在何种上下文中使用的内容。

对您的问题的简单直接回答可能是：

listBox1.Items.Add(textBox1.Text)

供参考：How to: Add and Remove Items with the Windows Forms ListView Control

Answer 2

试试这个（要将listview1列入你的列表视图名称）

Dim i As Integer = 0
    For Each l In TextBox1.Lines
        ListView1.Items.Add(l)
        ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(TextBox2.Lines(i))
        i += 1
    Next
    i = 0

Answer 3

我假设您的用户名存储在TextBox1中，而您的真实姓名存储在TextBox2中

Public Sub AddListViewItemsFromTextboxes()

        Dim Host As String = "SomeHost" 'you mentioned a host in the code snippet in your question, not sure where this comes from

        Dim TextBox1String As String = TextBox1.Text
        Dim TextBox2String As String = TextBox2.Text

        Dim TextBox1Lines() As String = TextBox1String.Split(vbNewLine)
        Dim TextBox2Lines() As String = TextBox2String.Split(vbNewLine)

        If(TextBox1Lines.Count <> TextBox2Lines.Count)
            'possible error handling here
            MsgBox("Each user must have both a real name and a username.")
            Exit Sub
        End If

        For NameIndex As Integer = 0 to (TextBox1Lines.Count - 1)
            Dim UserName As String = TextBox1Lines(NameIndex)
            Dim RealName As String = TextBox2Lines(NameIndex)

            Dim Item As New ListViewItem
            Item.Text = Host

            Dim UserNameSubItem As New ListViewitem.ListViewSubItem
            UserNameSubItem.Text = UserName

            Item.SubItems.Add(UserNameSubItem)

            Dim RealNameSubItem As New ListViewItem.ListViewSubItem
            RealNameSubItem.Text = RealName

            Item.SubItems.Add(RealNameSubItem)

            ListView1.Items.Add(Item)

        Next        

    End Sub

示例GUI： http://i.stack.imgur.com/du95F.png

编辑：添加第三列

从文本框添加内容到listview

3 个答案: