以下程序的输出结果是( )。 Dim varl Dim var2 Dim var3 varl="Hello" var2="World!" var3=varl & " " & var2 varl=10 var2=20 MSgBox var l+var2
A．Hello World!
B．30
C．1020
D．Hello World!
[单选题]以下程序的输出结果是( )。 Dim var1 Dim var2 Dim var3 var1 = "Hello" var2 = "World !" var3 = var1&" "&var2 var1 = 10 var2 = 20 MsgBox var1 + var2A．Hello World! 30B．30C．102D．Hello World!
[单选题]以下程序的输出结果是 ______。 Dim n(2,2), i, j As Integer For i = 0 To 2 For j = 0 To 2 n(i,j) = i + j Next j Next i For i = 0 To 1 For j = 0 To 1 n(i+ 1 ,j + 1) = n(i + 1,j + 1) + n(i, j) Next j Next i Print n(i, j)A．14B．0C．6D．值不确定
[单选题]以下程序段的执行结果是 ______。 Dim A(3, 3) For m = 1 To 3 For n = 1 To 3 If n = m Or n = 3 - m + 1 Then A(m, n) =m + n Else A(m, n) = 0 End If Next n Next m For m = 1 To 3 For n = 1 To 3 Print A(m, n); Next n Print Next mA． 1 1 1 1 1 1 1 1 1B．2 0 4 0 4 0 4 0 6C
[单选题]下列程序段执行后，执行的结果是______ 。 Dim M(10) Dim N(10) i=3 For j = 1 To 5 M(j) = j N(i) = 2 * i + j Next j Print N(i); M(i)A．12 4B．11 3C．3 11D．10 2
[单选题]下列程序的输出结果是( )。 Dim a a=Array(1，2，3，4，5，6，7，8) i=0 For k=100 To 90 Step-2 s=a(i)^2 If a(i)＞3 Then Exit For i=i+1 Next k Print k；i；sA．88 6 36B．88 1 2C．90 2 4D．94 3 16
[试题]（9）下列程序的输出结果是。 Sub Prin() Dim B As String A=1 B=A & Space(4)&A PrintA Print trim(B) End Sub
[单选题]以下程序段的执行结果是 ______。 Dim a As Integer，b As Integer For a=4 To 1 Step-1 b=b+a Next a Print b， aA．100B．9 1C．10 1D．90
[单选题]下面程序运行后,输出的结果是D．im arr(3,3)F．or j=1 To 3F．or k=1 To 3A．rr(j,k)=(j-1)*3+kNext kNext jF．or j=2 To 3F．or j=2 To 3Print arr(k,j);Next kPrintNext jA．2 5 3 6B．5 8 6 9C．4 7 5 8D．5 9 6 8
[单选题]下面程序运行后，输出的结果是 Dim arr(3,3) For j=1 To 3 For k=1 To 3 Arr(j,k)=(j-1)*3+k Next k Next j For j=2 To 3 For j=2 To 3 Print art(k,j)； Next k Print Next jA．2 5 3 6B．5 8 6 9C．4 7 5 8D．5 9 6 8
[单选题]以下程序段运行的结果是______。 Dim a(-1 To 5)As Boolean Dim flag As Boolean flag=False Dim i As Integer Dim j As Integer Do Until flag=True For i=-1 To 5 j=j+l If a(i)=False Then a(i)=True Exit For End If If i=5 Then flag=True End If Next Loop Print jA．20B．7C．35