[单选题]

(30)窗体上有一个名为Command 1的命令按钮,并有如下程序:

Private Sub Command 1_Click()

D.im a(10),x%

F.or k=1To10

a(k)=lnt(Rnd*90+10)

x=x +a(k) Mod 2

Next k

Print x

E.nd Sub

程序运行后,单击命令按钮,输出结果是

A.)10个数中奇数的个数

B.)10个数中偶数的个数

C.)10个数中奇数的累加和

D.)10个数中偶数的累加和

参考答案与解析:

相关试题

窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub

[单选题]窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Commandl_Click()D.im a(1 0),x%a(k)=Int(Rnd*90+10)x=x+a(k)Mod 2Print xE.nd Sub程序运行后.单击命令按钮,输出结果是A.10个数中奇数的个数B.l0个数中偶数的个教C.10个数中奇数的累加和D.10个数中偶数的累加和

  • 查看答案
  • 窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub

    [单选题]窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Command_Click()D.im a As Integer,b As Integera=8b=12Print Fun(a,b);a;bE.nd SubPrivate Function Fun(ByVal a As Integer,b As Integer)As Integera=a Mod 5b=b\5F.un=aE.nd Function程序运行时,单击命令按钮,则输出结果是A.3 3 2B.3 8 2C.

  • 查看答案
  • 窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub

    [单选题]窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Command 1_Click()D.im a As Integer, b As Integera=8b=12Print Fun(a, b);a; bE.nd SubPrivate Function Fun(ByVal a As Integer, b As Integer)As Integera=a Mod 5b=b、5F.un=aE.nd Function程序运行时,单击命令按钮,则输出结果是A.)3 3 2B.

  • 查看答案
  • 在窗体上有一个名称为Command1的命令按钮,并有如下程序: 程序执行时,单击

    [单选题]在窗体上有一个名称为Command1的命令按钮,并有如下程序:程序执行时,单击命令按钮Command1三次后,窗体上显示的结果为( )。A. 5 16B. 5 6C. 15 15D. 15 6

  • 查看答案
  • ( 34 )窗体上有一个名为 Command1 的命令按钮,并有下面的程序:Pr

    [单选题]( 34 )窗体上有一个名为 Command1 的命令按钮,并有下面的程序:Private Sub Comand1_Click ()D.im arr ( 5 ) As IntegerF.or k=1 To 5arr ( k ) =kNext kprog arr ()F.or k=1 To 5Print arr ( k )Next kE.nd SubSub prog ( a () As Integer )n=U b ound ( a )F.or i=n To 2 step -1F.or j=1 T

  • 查看答案
  • 在窗体上添加一个命令按钮(名为Command1),编写如下事件过程:Privat

    [单选题]在窗体上添加一个命令按钮(名为Command1),编写如下事件过程: Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=-1 To 2 x=x+6 Next k Next j Next i MsgBox x End Sub 打开窗体后,单击命令按钮,消息框的输出结果是( )。A.7B.15C.157D.528

  • 查看答案
  • 设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程:Privat

    [单选题]设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程: Private Sub Commandl Click() StatiC b As Variant b=Array(1,3,5,7,9) ... End Sub 此过程的功能是把数组b中的5个数逆序存放(即排列为9,7,5,3,1)。为实现此功能,省略号处的程序段应该是A.For i=0 To 5-1/2 tmp=b(i) b(i)=b(5-i-1) b(5-i-1)=tmp NextB.For i=0 To 5 tmp=b(i

  • 查看答案
  • 设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程:Privat

    [单选题]设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程: Private Sub Command1_Click() Static b As Variant b=Array(1,3,5,7,9) End Sub 此过程的功能是把数组b中的5个数逆序存放(即排列为9,7,5,3,1)。为实现此功能,省略号处的程序段应该是( )。A.For i=0 To 5-1/2 tmp=b(i) b(i)=b(5-i-1) b(5-i-1)=tmp NextB.For i=0 To 5 tmp=b(i

  • 查看答案
  • 设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程:Privat

    [单选题]设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程: Private Sub Command1_Click( ) Static b As Variant b=Array(1,3,5,7,9) …… End Sub 此过程的功能是把数组b中的5个数逆序存放(即排列为9,7,5,3,1)。为实现此功能,省略号处的程序段应该是A.Fori=0 T0 5-1/2 tmp=b(i) b(i)=b(5-i-1) b(5-i-1)=tmp NextB.Fori=0 To 5 tmp=b(i)

  • 查看答案
  • 在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:Privat

    [单选题]在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As String, c As Integer a=1234: b=Str(a)c=Len(b)Print c End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。A.0B.5C.6D.7

  • 查看答案