【正文】
”) NEXT JNEXT IFOR I=1 TO 2 FOR J=I+1 TO 3TEMP=A(J,I):A(J,I)=A(I,J):A(I,J)=TEMP NEXT JNEXT IPRINTFOR I=1 TO 3 FOR J=1 TO 3PRINT A(I,J); NEXT J PRINTNEXT I程序運行后,分別輸入:7,則程序的運行結(jié)果為: 。Dim A(5,5) As Integer,I As Integer,J As IntegerFor I=1 TO 3For J=1 To 3 A(I,J)=(I1)*3+J : Print A(I,J);Next JPrintNext IEnd在窗體上畫一個名稱為 Commandl 的命令按鈕,然后編寫如下程序: Private Sub Commandl Click() Print Next i End Sub 程序運行后,單擊命令按鈕,窗體上顯示的是 _____ 。 A(k+1)=InputBox(“ 請輸入一個整數(shù) ”) :7.下列程序運行后輸出的結(jié)果是( ?。〧OR I=1 to 10 A(I)=I*10+INEXT IPRINT A(6)/A(5)在窗體上添加一命令按鈕,其名為Command1,然后編寫如下事件代碼:Private Sub Command1_Click( )Dim a(5) As Integer,b(5) As Integer n=3 For I=1 to 5 a(i)=I : b(i)=2*a(i)+iNext IPrint a(n)。1在窗體上添加一命令按鈕,其名為mand1,然后編寫如下事件代碼: Private sub mand1_click( ) dim a(5) as integer,b(5) as integer n=3 for i=1 to 5 a(i)=i b(n)=2*n+i next i Print a(n)。Asi2 intA(ii1 intB(3=intB(i) End sub程序運行后的結(jié)果是 。 next jprint next iend sub 程序運行后,窗體中顯示的是: ,然后編寫如下事件過程:Private Sub Command1_Click() Dim arr(5) As Integer, n As Integer For i = 1 To 5 arr(i) = i + 1 Next fun arr, n = Str(n)End Sub程序運行后,單擊命令按鈕,則在文本框中顯示的內(nèi)容是 Dim A(10),B(5) For I=1 To 10 A(1)=I Next I For J=1 To 5 B(J)=J*20 Next J A(5)=B(3) :Print A(5)=;A(5)DIM A(10) AS INTEGER FOR I= 1 TO 10 A( I )= I NEXT I PRINT A(I)則程序運行輸出結(jié)果為 2 在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫如下事件過程: Private Sub Command1_Click() Dim i,j As Integer array1(i,j)=i+j arr1(n)End Sub2以下程序運行的結(jié)果是