在窗体中使有一个文本框(名为 n )接受输入的值,有一个命令按钮 run ,事件 代码 如下:Private
在窗体中使有一个文本框(名为 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
打开窗体后,如果通过文本框输入的值为 4 ,单击命令按钮后输出的图型是}
A. ****
****
****
****
B. *
***
*****
*******
C. ****
******
********
**********
D. ****
****
****
****
![](https://lstatic.shangxueba.com/sxbcn/h5/images/tips_org.png)