单项选择题

窗体上有一个名为Command1的命令按钮，并有下面的程序：
Private Sub Command1_Click()
Dim arr(5) As Integer
For k=1 To 5
arr(k)=k
Next k
Prog arr()
For k=1 To 5
Print arr(k)
Next k
End Sub
Sub prog(a() as Integer)
n=Ubound(

A．
For i=n To 2 Step-1
&nbs
<上一题 目录 下一题>
热门 试题

单项选择题
窗体上有一个Text1文本框和一个Command1命令按钮，并有以下程序 Private Sub Command1_Click() Dim n If Text1.Text＜＞ 123456 Then n=n+1 Print 口令输入错误 & n & 次 End If End Sub 希望程序运行时得到如图3所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是如图4所示的效果，所以需要修改程序。下列各修改方案中正确的是
单项选择题
有下面的程序段，其功能是按如图1所示的规律输出数据： Dim a (3,5) As Integer For i=1 To 3 For j=1 To 5 a(i,j)=i+j print a (i,j) Next Print Next 若要按图2所示的规律继续输出数据，则接在上述程序段后面的程序段应该是
相关试题