Question

第一次尝试VB并需要一些帮助。

我有一个列表框，我希望在单击按钮时为每个lostbox项运行相同的任务。在python中我会使用for x in y:

但是我为vb做了什么？

到目前为止的代码

Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click

Dim mesg As String
Dim pw As String
Dim id As String
For i As Integer = 0 To Me.ListBox2.Items.Count - 1
 id = Me.ListBox2.Items(i).ToString
 mesg = TextBox1.Text.ToString()         
 pw = "S"
 MessageBox.Show(id & mesg & pw, "test")
Exit For

   Next
End Sub

一旦点击 ok ，我想要列表框中每个项目的消息框

Answer 1

VB有许多方法可以循环。

似乎你遇到了For...Next循环结构。

Python的for x in y听起来像VB的For Each...Next循环：

Dim message As String = TextBox1.Text;
Dim pw As String = "S";

Dim item As String
For Each item In ListBox2.Items
    MessageBox.Show item & message & pw, "test"
Next

我强烈建议您阅读VB Loop Structures on MSDN

Answer 2

您想要为每个循环使用a。它更易于阅读和编写，无需担心跟踪迭代。

For Each listItem As ListBoxItem In ListBox2.Items
      // do your work with each item here
Next

VB2010 for x in y equivalent

2 个答案: