設(shè)有如下程序: Private Sub Command1_Click() Dim a Dim I As Integer a=Array(1,2,3,4,5,6,7,8,9) For I=0 To 3 Print a(5-I); Next I End Sub 程序運(yùn)行后,單擊窗體,則在窗體上顯示的是()
A.4321 B.5432 C.6543 D.7654
在窗體上畫一個(gè)名稱為Command1的命令按鈕,然后編寫如下程序: Private Sub Command1_Click() Dim I As Integer,j As Integer Dim a(10,10)As Integer For I=1 To 3 For j=1 To 3 a(I,j)=(I-1)*3+j Print a(I,j); Next j Print Next i End Sub 程序運(yùn)行后,單擊命令按鈕,窗體上顯示的是()。(其中CR表示回車和換行)
A.1 2 3 CR 3 4 5 CR 5 6 7 CR B.2 3 4 CR 4 5 6 CR 7 8 9 CR C.1 4 7 CR 4 5 8 CR 9 10 11 CR D.1 2 3 CR 4 5 6 CR 7 8 9 CR
在窗體上畫一個(gè)名稱為Text1的文本框和一個(gè)名稱為Command1的命令按鈕,然后編寫如下事件過程: Private Sub Command1_Click() Dim array1(10,10)As Integer Dim I,j As Integer For I=1 To 3 For j=2 To 4 array1(I,j)=I+j Next j Next I Text1.Text=array1(2,3)+array1(3,4) End Sub 程序運(yùn)行后,單擊命令按鈕,在文本框中顯示的值是()
A.12 B.13 C.14 D.15