VB2010（xはy相当）

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一度リストボックス内の各項目について、そのメッセージボックスをしたいがVBがループを作るために多くの、多くの方法があります

Answer 1

をクリックされました。

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

あなたは各ループのために使用したいと思う読んでお勧めします。読んだり書いたりするのが簡単で、繰り返しの記録を心配する必要もありません。

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