窗体上有一个名为Command1的命令按钮,并有如下程序: Private Sub Command1Click( ) Dim a(10),x% Fork=1 To 10 a(k)=Int(Rnd*90+10) x=x+a(k)Mod 2 Next k Print X End Sub 程序运行后,单击命令按钮,输出结果是( )。A.10个数中奇数的个数B.10个数中偶数的个数C.10个数中奇数的累加和D.10个数中偶数的累加和
窗体上有一个名为Command1的命令按钮,并有如下程序: Private Sub Command1Click( ) Dim a(10),x% Fork=1 To 10 a(k)=Int(Rnd*90+10) x=x+a(k)Mod 2 Next k Print X End Sub 程序运行后,单击命令按钮,输出结果是( )。
A.10个数中奇数的个数
B.10个数中偶数的个数
C.10个数中奇数的累加和
D.10个数中偶数的累加和
相关考题:
窗体上有一个名为Command1的命令按钮,并有如下程序: Private Sub Corqmand1_Click( ) Dim a As Integer,b As Integer a=8 b=12 Print Fun(a,b);a;b End Sub Private Function Fun(ByVal a As Integer,b AS Integer)As Integer a=a Mod 5 b=b\5 Fun=a End Function 程序运行时,单击命令按钮,则输出结果是( )。A.3 3 2B.3 8 2C.8 8 12D.3 8 12
在窗体上添加一个命令按钮(名为Command1),然后编写如下程序:Private Sub Command1_Click()Dim a As Integer,b As Integerx=10y=20End Sub打开窗体运行后,单击命令按钮,消息框的输出结果为( )。
在窗体上有一个名称为Command1的命令按钮,并有如下程序:程序执行时,单击命令按钮Command1三次后,窗体上显示的结果为( )。A. 5 16B. 5 6C. 15 15D. 15 6
窗体上有一个名称为Command1的命令按钮,并有如下程序: Private Sub Command1 Click( ) x=14 Do While x0 x=x-3 x=IIf(Int(x/5)=x/5,x+2,x) Loop Print x End Sub 程序运行后,单击命令按钮Command1,输出结果为( )。A.0B.-lC.-2D.-_3
窗体上有一个名称为Command1的命令按钮,并有如下程序:Private Sub Command1 Click( )x=15Do While x0x=x-3x=IIf(Int(x/5)=x/5,x+2,x)LoopPrint xEnd Sub程序运行后,单击命令按钮Command1,输出结果为( )。A.0B.-lC.-2D.-_3
(30)窗体上有一个名为Command 1的命令按钮,并有如下程序:Private Sub Command 1_Click()Dim a(10),x%For k=1To10a(k)=lnt(Rnd*90+10)x=x +a(k) Mod 2Next kPrint xEnd Sub程序运行后,单击命令按钮,输出结果是A)10个数中奇数的个数B)10个数中偶数的个数C)10个数中奇数的累加和D)10个数中偶数的累加和
窗体上有一个名为Command1的命令按钮,并有如下程序: Private Command1_Click() Dim a(10),x% For k=1 to 10 a(k)=Int(Rnd*90+10) x=x+a(k) Mod 2 Next k print x End Sub 程序运行后,单击命令按钮.输出结果是 。A.10个数中奇数的个数B.10个数中偶数的个数C.10个数中奇数的累加和D.10个数中偶数的累加和