添加单词& VB.net 2010中列表框项目开头的数量计数

时间:2013-09-17 01:33:02

标签: vb.net listbox

我有一个多行文本框textbox1,想要将内容添加到listbox1,但在每个项目之前我需要添加“wordX =”,其中“X”是项目编号。< / p>

textbox1的示例:

  

鲍勃
  齿轮
  狗
  等

然后listbox1应该:

  

WORD1 =鲍勃
  WORD2 =齿轮
  WORD3 =狗
  等

目前,我使用以下行将textbox3内容复制到listbox1,但无法找到如何添加“word”和正确的数字。

ListBox1.Items.AddRange(TextBox3.Text.Split(vbNewLine))

1 个答案:

答案 0 :(得分:2)

这就是我用来完成你想要的东西。

Dim tbLines As String() = TextBox1.Text.Split(vbNewLine)
ListBox1.Items.Clear()

For i As Integer = 1 To tbLines.Length
    ListBox1.Items.AddRange({"word" & i & "=" & tbLines(i - 1).Trim})
Next

我像你一样使用vbNewLine分隔符拆分文本框。然后,我遍历该数组中的每个索引,将字符串“word”与i(当前索引)整数连接起来。我最后将“=”和列表框中的修剪值连接起来。