问题
单项选择题
在窗体中使用一个文本框(名为n)接收输入的值，有一个命令按钮run，事件代码如下。
Private Sub run_Click()
result=""
For i=1 To Me!n
For j=1 To Me!n
result=result+"*"
Next j
result=result+Chr(13)+Chr(10)
Next i
MsgBox result
End Sub
打开窗体后，在文本框n中输入4，输出结果是( )。
A) ****
****
****
****
B)
*
***
*****
*******
C)
****
******
********
**********
D)
****
****
****
****
答案
参考答案：D
解析： 本题考查了VBA中的F0r循环语句的嵌套使用。
事件代码中是一个For循环的二重嵌套，外循环的循环变量i从1循环递增到Me!n也就是文本框n中的值4，内循环的循环变量j也是从1循环递增到4。而内循环的循环体result=result+“*”语句每次执行后将在result字符串后增加一个*字符。所以，每次内循环4次循环结束后result被增加4个*，接下来外循环中result=result+Chr(13)+Chr(10)语句的功能是让result字符串新起一行。所以，外循环4次循环结束后，result中的结果为A)。
