Vb.net 如何枚举列表框?

Vb.net 如何枚举列表框?,vb.net,visual-studio,Vb.net,Visual Studio,您好,我是Visual Studio的新手,我需要Visual Studio中一个Windows窗体应用程序的帮助。我也不知道这是不是vb.net 我想制作一个应用程序,如果用户在文本框中输入某个内容,它将显示在列表框中,同时具有某种枚举 比如说 如果我在文本框中键入“哇,太棒了”并确认。然后在文本框中键入另一个文本,如“我爱你”,然后再次确认 它应该在列表框中显示为“1.哇,太棒了”和“2.我爱你”。 这是我的密码。我不知道怎么做,也不知道怎么做。我试着做for循环和Do While但是它只会

您好,我是Visual Studio的新手,我需要Visual Studio中一个
Windows窗体应用程序的帮助。我也不知道这是不是vb.net

我想制作一个应用程序,如果用户在
文本框
中输入某个内容,它将显示在
列表框
中,同时具有某种枚举

比如说

如果我在
文本框中键入“哇,太棒了”并确认。然后在
文本框中键入另一个文本,如“我爱你”,然后再次确认

它应该在
列表框中显示为“1.哇,太棒了”和“2.我爱你”。

这是我的密码。我不知道怎么做,也不知道怎么做。我试着做
for
循环和
Do While
但是它只会复制文本,还是我做错了什么

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim i As Integer = 0
ListBox1.Items.Add(i + 1 & ". " & TextBox1.Text)
End Sub
你太近了

在每个按钮上单击您需要的:

  • 获取列表中元素的数量,以确定数量

  • 插入与数字连接的文本

  • 因此,您应该使用以下代码:

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        'Step 1
        Dim i As Integer = ListBox1.Items.Count + 1
        'Step 2
        ListBox1.Items.Add(i & ". " & TextBox1.Text)
    End Sub
    

    为什么不起作用?i变量需要在该范围之外声明。将它移到按钮1_点击线上方。虽然它不是我一直在寻找的,但它仍然有效。启动调试时,它只会输入一个数字。我想要的是:1。测试2。测试2如果你得到了分数,谢谢!!我真的很感谢你的帮助!