国产日韩精品一区在线不卡,国产成人精品999在线观看

單項選擇題 在窗體上畫一個名稱為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
程序運行后，單擊命令按鈕，窗體上顯示的是（）。（其中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

點擊查看答案

您可能感興趣的試卷

你可能感興趣的試題

1.單項選擇題 在窗體上畫一個名稱為Text1的文本框和一個名稱為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
程序運行后，單擊命令按鈕，在文本框中顯示的值是（）

A.12
B.13
C.14
D.15

點擊查看答案

2.單項選擇題 在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click（）
Dim c As Integer，n As Integer
For c=0 To 50
c=c+3
n=n+1
Ifc＞10Then Exit For
Next c
Text1.Text=Str（n）
End Sub
程序運行后，單擊命令按鈕，在文本框中顯示的值是（）

A.2
B.3
C.4
D.5

點擊查看答案

3.單項選擇題 在窗體上畫兩個名稱分別為Text1、Texte2的文本框和一個名稱為Command1的命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click（）
Dim x As Integer，n As Integer
x=1
n=0
DoWhilex＜20
x=x*3
n=n+1
Loop
Text1.Text=Str（x）
Text2.Text=Str（n）
End Sub
程序運行后，單擊命令按鈕，在兩個文本框中顯示的值分別是（）

A.15和1
B.27和3
C.195和3
D.600和4

點擊查看答案

4.單項選擇題 表達式：5+10 mod 10\9/3+2^2 的結果為（）

A.6
B.7
C.8
D.10

點擊查看答案

5.單項選擇題 在Do......Loop語句中有兩種形式：
形式1：
Do{While|Until}＜條件＞
語句塊
[Exit Do
語句塊]
Loop形式2：
Do
語句塊[Exit Do
語句塊]
Loop{While|Until}＜條件＞
形式1和形式2的區(qū)別在于（）

A.形式1為先執(zhí)行后判斷，至少執(zhí)行一次形式2為先判斷后執(zhí)行，可能一次也不執(zhí)行
B.形式1為先判斷后執(zhí)行，可能一次也不執(zhí)行形式2為先執(zhí)行后判斷，至少執(zhí)行一次
C.形式1為先判斷后執(zhí)行，至少執(zhí)行一次形式2為先執(zhí)行后判斷，至少執(zhí)行一次
D.以上說法都不正確

點擊查看答案

^{<strike id="vesge"></strike>}