[单选题]

在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: Pfivme Sub Command1_Click( ) score=Iht(Rnd*10)+70 Select Case score Case ls<60 a$=“F” Case 60 T069 a$=“D” Case 70 To 79 a$=“C” Case 80 To 89 a$=“B” Case Else a$=“A” End Select Print aS End Sub 程序运行后,单击命令按钮,输出结果是

A.A

B.B

C.C

D.D

参考答案与解析:

相关试题

在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码:

[单选题]在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(2,4,6,8) j=1 For i=4 To 1 Step-2 s=s+a(i)*j j=j*10 Next i Print 3 End Sub 运行上面的程序,单击命令按钮,其输出结果是 ( )A.2B.4C.8D.48

  • 查看答案
  • 在窗体上画一个命令按钮(其NAME属性为Command1),然后编写如下代码:

    [单选题]在窗体上画一个命令按钮(其NAME属性为Command1),然后编写如下代码:Option Base 1Private Sub Command1_Click()Dim as = 0a = Array(1,2,3,4)j = 1For i = 4 To 1 Step -1 s = s + a(i) * j j = j * 10Next iPrint sE.nd Sub运行上面的程序,单击命令按钮,其输出结果是( )。A.4321B.1234C.34D.12

  • 查看答案
  • 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:

    [单选题]在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:Private Sub Command1_Click()D.im a(5,5)F.or i=1 To 3F.or j=1 To 4a(i,j)=i*jNextNextF.or n=1 To 2F.or m=1 To 3Print a(m,n);NextNextE.nd Sub程序运行后,单击命令按钮,输出结果是A.2 4 6 1 2 3B.1 2 3 2 4 6C.1 2 3 4 5 6D.6 5 4 3 2 1

  • 查看答案
  • 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:

    [单选题]在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:Option Base 1Private Sub Command1_Click()D.im as=0:j=1a=Array(1,2,3,4)F.or i=4 To 1 Step-1s=s+a(i)*jj=j*10NextPrint sE.nd Sub运行上面的程序并单击命令按钮,其输出结果是A.4221B.1234C.34D.12

  • 查看答案
  • 在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码:O

    [单选题]在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Coramandl_Click() Dim a s=0 a=Array(1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next i Print s End Sub 运行上面的程序,单击命令按钮,其输出结果是______。A.4221B.1234C.34D.12

  • 查看答案
  • 在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码:O

    [单选题]在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a(4,4) For i=1 To 4 For j=1 To 4 a(i,j)=(i-1)*3+j Next j Next i For i=3 To 4 For j =3 To 4 Print a(j,i); Next j Print Next i End Sub程序运行后,单击命令按钮,其输出结果为______ 。A.6

  • 查看答案
  • 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:P

    [单选题]在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:Private Sub Command1_C1ick()D.im a(5,5)F.or i=1 To 3F.or j=1 To 4a(i,j) =i*jNextNextF.or n=1 To 2F.or m=1 To 3Print a(m,n);NextNextE.nd Sub程序运行后,单击命令按钮,输出结果是A.2 4 6 1 2 3B. 1 2 3 2 4 6C.1 2 3 4 5 6D.6 5 4 3 2 1

  • 查看答案
  • 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:O

    [单选题]在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a(4,4) For i=1 To 4 For j=1 To 4 a(i,j)=(i-1)*3+j Next j Next i For i=3 To 4 For j=3 To 4 Print a(j,i); Next j Next i End Sub 程序运行后,单击命令按钮,其输出结果为 ______ 。A.6 9 7 1

  • 查看答案
  • 在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:P

    [单选题]在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Private Sub Command1_Click() Dim Arr1(10)As Integer,arr2(10)As Integer n=3 For i=1 To 5 Arr1(i)=i arr2(n)=2*n+i Next i Print arr2(n);Arr1(n) End Sub 程序运行后,单击命令按钮,输出结果是 ______。A.11 3B.3 11C.13 3D.3 13

  • 查看答案
  • 在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码:Priva

    [单选题]在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码: Private Sub Command1_Click() a=0:b=5:c=6 MsgBox a=b+c End Sub 窗体打开运行后,如果单击命令按钮,则消息框的输出结果为______。A.11B.a=11C.0D.False

  • 查看答案
  • 在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: