VB.Net双重循环的实例

乐博网lob.cn提示：调试环境为 vs2005 +  windows2003 / windows2008 / xp / vista

Public Class TDArrayForm
    Dim num(2, 3) As Integer
    Dim i As Integer
    Dim j As Integer
    Private Sub TDArrayForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        For i = 0 To 1 ''双重循环
            For j = 0 To 2
                num(i, j) = i + j
            Next
        Next
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        For i = 0 To 1
            For j = 0 To 2
                MessageBox.Show(num(i, j))
            Next
        Next  '更多.net源码和实例，来自乐博网 www.lob.cn
    End Sub
End Class

乐博网还有几篇关于for循环的文章大家可以参考：

VB.Net For Next的实例

VB.Net For Each遍历的实例

VB.Net For循环的实例

VB2008在集合中使用For Each...Next循环

VB2008用For Next循环进行循环