在窗体上画一今名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Integer,s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a<=0 Print s;a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ______。
- A79
- B340
- C97
- D死循环
在窗体上画一今名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Integer,s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a<=0 Print s;a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ______。
解析:Do…Loop While循环采用的是先执行循环体再判断条件的做法。所以代码先执行了一次循环体,使得 s=9,a=7,再判断条件a=0为假,则终止循环。
1、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim c As Integer,n As IntegerFor c=0 T...
2、在窗体上画一个命令按钮(其名称为Command1),然后编写如下事件过程:
在窗体上画一个命令按钮(其名称为Command1),然后编写如下事件过程: Private Sub Comnmnd1_Click() Dim a(5,5)As Integer Dim i As Integer, j As Integer For ...
3、在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Pr
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1 CliCk()a=0n=InputBox(””)For i=1 To nFor i=1 To iA=a+1Next jNext iPr...
4、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim array1(10,10)As IntegerDim I,j As...
5、在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Pri
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Private Sub Command1_Click()Dim I As Integer,j As IntegerDim a(10,10)As IntegerFor I=1 To...
6、在窗体上画—个名称为Command1的命令按钮,然后编写如下事件过程: Pr
在窗体上画—个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click_() For n=1 To 20 If n Mod 3<>0 Then m=m+n3 Next n print ...