赤峰学院vb模拟试题库（含答案）

End Sub

三次单击命令按钮后，t1,t2的值分别为（ ）： A) 1 1

B) 3 3 C) 1 3 D) 3 1

二、 填空题（每题2分,计20分）

1．在Visual Basic中可以建立（ ）菜单和（ ）菜单。

2．建立打开文件、颜色对话框所使用的方法分别为（ ）和（ ）。如果使用action属性，则应把该属性的值分别设置为（ ）和（ ）。 3．数学表达式

x?32?3x的VB算术表达式为（ ）。 2x4．表达式Ucase(right(“abcdefgh”,5)的值是( )。

5．以下程序的功能是：从键盘上输入学生的考试分数，统计并输出最高分数和最低分，当输入负数时结束输入，输出结果。请填空。 Private Sub Form_click()

Dim x As Single, amax As Single, amin As Single x = InputBox(\ amax = x amin = x Do While x > 0 If ( ) Then amax = x End If

If ( ) Then amin = x End If

x = InputBox(\ Loop

Print \End Sub

三、写出下面程序的运行结果（10分）

1. Private Sub Command1_Click() x = 0

n = InputBox(\ For i = 1 To n

33

For j = 1 To i x = x + 1 Next j Next i Print x End Sub

程序运行后，单击命令按钮，如果输入5，则在窗体上显示的内容是:

2.

Option base 1

Private sub subp(b() As Integer) for i=1 to 4 b(i)=2*i next i End Function

Private Sub Command1_Click() Dim a() as integer

a(1)=5 a(2)=6 a(3)=7 a(4)=8 subp a() for i= 1 to 4 print a(i) next i End Sub

单击命令按钮后，程序的运行结果为： 四、程序设计（10分）

我国现有人口约13亿，设年增长率为0.8%，编写程序，计算多少年后增加到20亿。

答案 一、

选择题

CBDAA BCCCD BDBDC CACBD CBCBA DDBCC

二、

填空题

34

1． 下拉式 弹出式

2． Showopen showcolor 1 3 3． Sqr(x)/(2*a)+3^2-3*x 4． DEFGH

5． amaxx 三、

写出下程序的运行结果 1． 15 2. 2 4 6 8

四、

程序设计

Private Sub Form_click()

Dim p As Single, r As Single, n As Integer n = 0: p = 13: r = 0.008 Do While p <= 20 p = p * 1.01 n = n + 1 Loop

Print n; \年后增加至\亿\End Sub

模拟试题八

一、选择题（每题2分，计60分）

(1) Visual Basic是可视化的、面向( )采用事件驱动方式的结构化高级程序设计语言。

A) 过程 B) 对象 C) 事件 D) 任务

(2) 退出For循环可使用的语句为（ ）。

A) Exit For B) Exit Do C) End For D) End Do

(3) 确定一个窗体或控件的大小的属性是( )。

A)Width或Height B)Width和Height C)Top或Left D)Top和Left

35

(4) 标签对象的名称（Name属性）为Label1，则把标签的标题设置为“演示示例”的语句是( )。

A) Label1 = \演示示例\演示示例\C) Label1.Text = \演示示例\演示示例\(5)以下不属于键盘事件的是（ ）。

A) KeyDown B) KeyUp C) Unload D) KeyPress (6) Msgbox函数返回值的类型是（ ）。

A) 整型数值 B) 字符串 C)变体 D)数值或字符串 (7) 设a=6，则执行 x=IIf(a>5,-1,0)后，x 的值为( ) 。

A) 5 B) 6 C) 0 D) -1

(8) 产生[1，100]之间的随机整数的Visual Basic表达式是（ ）。

A) Int(Rnd*100)+1 B) Int(Rnd*1)+100 C) Int(Rnd*101)+1 D) Int(Rnd)+100 (9) 执行语句s=right(\后，s的值是( )。

A) Visual

B) Basic

C) 6

D) 11

(10) 下面（ ）是合法的变量名。

A) dim B) A-1 C) _123 D) t_t6 (11) 设a=1，b=2，c=3，d=4，下列表达式的值是( )。

NOT a<= c OR 4*c=b^2 AND b< >a+c A）-1 B)1 C）True D) False

(12) \\、/、mod、*等4个算术运算符中，优先级最低的是（ ）。

A)\\ B)/ C)mod D)*

(13) 以下程序段的输出结果是 （ ）。

a = Sqr(3) b = Sqr(2) print a>b

A）-1 B）0 C）False D）True

(14) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程

Private Sub Command1_Click() Text1.Text = \ Text1 = \

36