2010年计算机等级考试二级VB考点精简笔记

　　第三章 VB程序设计语句

　　1. For循环

　　For <循环变量>=<初值> to <终值>[step 步长]

　　<循环体>

　　[Exit For]

　　Next <循环变量>

　　1) 多重循环

　　Do循环

　　格式一：Do While <条件> <语句块> Loop

　　格式二：Do Until <条件> <语句块> Loop

　　格式三：Do <语句块> Loop While <条件>

　　格式四：Do <语句块> Loop Until <条件>

　　2) 二重循环

　　1.典型案例：求100以内的素数。2.取矩阵对角线上的元素。3.打印“*”型图。

　　3) 程序范例：

　　Const n=5,m=4

　　Dim a(m,n)

　　Private Sub Command1_Click()

　　K=1

　　For i=1 To m

　　For j=1 To n

　　a(i,j)=k

　　k=k+1

　　Next j

　　Next i

　　End Sub

　　Private Sub Command2_Click()

　　Summ=0

　　For i=1 To m

　　For j=1 To n

　　If i=1 Or i=m Then

　　Summ=summ+a(i,j)

　　Else

　　If j=I Or j=n Then

　　Summ=summ+a(i,j)

　　End If

　　End If

　　Next j

　　Next i

　　Print summ

　　End Sub

　　过程Command1_Click()的作用是二维数组a 中存放1个 m行n列的矩阵;过程Command2_Click()的作用是

　　A) 计算矩阵外围一圈元素的累加和 B) 计算矩阵除外一圈以外的所有元素的累加和

　　C) 计算矩阵第1列和最后一列元素的累加和 D) 计算矩阵第1行和最后一行元素的累加和