VB专题习题

Vb专题习题

一、选择题

1. 将数学表达式

写成Visual Basic表达式，正确的是（ ）

（A）Sqr(abs(b*b-4ac)) （B）Sqr(abs[b*2-4*a*c]) （C）Sqr(abs(b*b-4*a*c)) （D）Sqr[abs(b*b-4*a*c)]

2. 在Visual Basic中，若要将窗体中某个命令按钮设置成无效状态，应对该按钮的（ ）属性值进行修改。

（A）Value （B）Visible （C）Enabled （D）Caption 3. 执行如下Visual Basic程序段时，出现了如下图所示的错误： Private Sub Command1_Click() Dim a As Integer, b As Integer a = 5: b = 8 b = a + b

label1.Caption = Str(b) End Sub

引发此错误的语句可能为（ ） （A）Dim a As Integer, b As Integer （B）a = 5: b = 8 （C）b = a + b

（D）label1.Caption = Str(b)

4. 已知a=5，b=9，c=11，则下列Visual Basic表达式的值为False的是（ ） （A）a > b And a > c （B）a < b Or a > c （C）a < b + c （D）a > c – b 5. 有下列Visual Basic程序段：

某同学正编写一个判断两数大小的程序，其窗体和代码窗口如下图所示：

1 / 30

VB专题习题

根据代码窗口中的程序，要在程序运行时判断两数的大小，窗体上必须增加的对象是（ ） （A）标签Text1 （B）文本框Text2 （C）命令按钮Command1 （D）文本框Print

若程序要实现“求100内能被3整数的自然数个数”的功能，则方框中正确的语句是（ ） （A）i / 3 = 0 （B）i mod 3 = 0 （C）i \\ 3 = 0 （D）int(i/3) = 0

6. 有如下Visual Basic程序段： Private Sub Command1_Click() Dim a As Integer

a = Int(5 * Rnd + 1) * Int(5 * Rnd - 1) Print a End Sub

执行程序后，a的值范围是（ ）

（A）[0，15] （B）[－1，15] （C）[－4，15] （D）[－5，15]

2 / 30

VB专题习题

7. 在Visual Basic中，表达式3 ^ 2 Mod 14 \\ 2 ^ 3的值是（ ） （A）1 （B）0 （C）2 （D）3

8. 某同学正编写一个判断两数大小的程序，其窗体和代码窗口如下图所示：

根据代码窗口中的程序，要在程序运行时判断两数的大小，窗体上必须增加的对象是（ ）

（A）标签Text1 （B）文本框Text2 （C）命令按钮Command1 （D）文本框Print

9. 下列Visual Basic程序段中，能实现输出变量a、b、c三个数中最大数的是（ ）

10、有如下Visual Basic程序段：

3 / 30

VB专题习题

x = 3 y =5

Text1.Text = \

该程序运行后，要文本框Text1中显示的是（ ） （A）3+5 （B）x+y （C）8 （D）3+5=8

11. 在Visual Basic中，下列表达式的值为5的是（ ） （A）Int(Sqr(9) + 1.28) （B）(19 \\ 2) Mod 5 （C）Abs(-7) + Sqr(4) （D）Len(\

12. 在Visual Basic中，下列语句定义的数组元素为10个的是（ ） （A）Dim a(0 To 10) As Integer （B）Dim b(1 To 9) As String （C）Dim c(2 To 10) As Boolean （D）Dim d(0 To 9) As Date

13. 某Visual Basic工程的代码窗口如图所示：

从图中可以看出，当前正在编辑的是（）

A. Command1的Click事件过程代码 B. Timer1的Timer事件过程代码 C. Label1的Click事件过程代码 D. Image1的Click事件过程代码 14. 在Visual Basic中，下列能作为变量名的是（） A. My B. If C. a+y D. 2

4 / 30

nd