题库 题库

【单选题】

窗体上有一个名为Commandl的命令按钮,并有如下程序:
Private Sub 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个数中偶数的累加和

参考答案

查看答案

相关试题

单选题 设窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮,并有以下事件过程:
Private Sub Command1_Click()
x! = Val(Text1.Text)
Select Case x
Case Is < -10, Is >= 20
Print "输入错误"
Case Is < 0
Print 20 - x
Case Is < 10
Print 20
Case Is <= 20
Print x + 10
End Select
EndSub
程序运行时,如果在文本框中输入-5,则单击命令按钮后的输出结果是(    )。
查看答案
单选题 阅读程序:
Private Sub Command1_Click()
Dim arr
Dim i As Integer
arr = Array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
For i = 0 To 2
Print arr(7 - i);
Next
End Sub
程序运行后,窗体上显示的是(    )。
查看答案
单选题 在窗体上画一个名为Command1的命令按钮,然后编写以下程序:
Private Sub Command1_Click()
Dim a(10) As Integer
For k = 10 To 1 Step -1
a(k) = 20 - 2 * k
Next k
k = k + 7
Print a(k - a(k))
End Sub
运行程序,单击命令按钮,输出结果是(    )。
查看答案
单选题 为了在窗体上建立2组单选按钮,并且当程序运行时,每组都可以有一个单选按钮被选中,则以下做法中正确的是(    )。 查看答案
单选题 下面描述中错误的是(    )。 查看答案
单选题 下面可以产生20~30(含20和30)的随机整数的表达式是(    )。 查看答案
单选题 负责数据库中查询操作的数据库语言是(    )。 查看答案
单选题 设窗体上有一个名为Listl的列表框,并编写下面的事件过程:
Private Sub Listl_Click()
Dim ch As String
ch=Listl.List(Listl.ListIndex)
List1.RemoveItem List 1.ListIndex    -
List1.AddItem ch
EndSub
程序运行时,单击一个列表项,则产生的结果是(    )。
查看答案
单选题 结构化程序所要求的基本结构不包括(    )。 查看答案
单选题 在软件开发中,需求分析阶段产生的主要文档是(    )。 查看答案
单选题 假定编写了如下4个窗体事件的事件过程,则运行应用程序并显示窗体后,已经执行的事件过程是(    )。 查看答案
单选题 窗体上有一个名为Commandl的命令按钮,并有如下程序:
Private Sub 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
程序运行后,单击命令按钮,输出结果是(    )。
查看答案
单选题 定义无符号整数类为UInt,下面可以作为类UInt实例化值的是(    )。 查看答案
单选题 下列关于栈叙正确的是(    )。 查看答案
单选题 某二叉树共有7个结点,其中叶子结点只有1个,则该二叉树的深度为(假设根结点在第1层)(    )。 查看答案
单选题 设有如下程序
Private Sub Command1_Click()
x = 10: y = 0
For i = 1 To 5
Do
x = x - 2
y = y + 2
Loop Until y > 5 Or x < -1
Next
End Sub
运行程序,其中Do循环执行的次数是(    )。
查看答案
单选题 窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是(    )。 查看答案
单选题 设有以下函数过程
Private Function Fun(a() As Integer,b As String)As Integer

End Function
若已有变量声明:
Dim x(5)As Integer,n As Integer,ch As String
则下面正确的过程调用语句是(    )。
查看答案
单选题 窗体上有一个名为Commandl的命令按钮和一个名为Timerl的计时器,并有下面的事件过程:
Private Sub Command1_Click()
Timerl.Enabled=True
EndSub
Private Sub Form_Load()
Timerl.Interval=10
Timerl.Enabled=False
End Sub
Private Sub Timerl_Timer()
Commandl.Left=Commandl.Left+10
End Sub
程序运行时,单击命令按钮,则产生的结果是(    )。
查看答案
单选题 一个教师可讲授多门课程,一门课程可由多个教师讲授。则实体教师和课程间的联系是(    )。 查看答案