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循环进行循环
|