单项选择题阅读如下程序: Option Base 1 Private Sub Form Click() Dim Arr(4,4)As Integer For i=1 To 4 For j=1 To 4 Arr(i,j)=(i-1)*2+j Next j Next i For i=3 To 4 For j=3 To 4 Print Arr(j,i); Next j Print Next i End Sub 程序运行后,单击窗体,输出的结果为
单项选择题在窗体上画一个名称为Timet1的计时器、一个名称为Commandl的命令按钮和一个名称为Labell的标签。编写程序如下: Private Sub Command1_Click() Timer1.Enabled=True Timer1.Interval=1000 End Sub Private Sub Timerl Timer() Labell.Left=Labell.Left + 10 End Sub 当运行程序后,单击命令按钮,将会产生