广东药学院VB考试复习题

广东药学院VB考试复习题

一、单选题（每题2分，共30分）

1.我们通常说的U盘属于计算机部件中的___( )___。

(A) 输出设备 (B) 输入设备 (C) 存储设备 (D) 打印设备

2.下列表示存储容量的数据中，____( )____是最小的。

(A)20480 KB (B) 1.44 MB (C) 1 GB (D)486 Byte

3. 一个完整计算机系统应包括___()____。

(A) 主机和显示器 (B) 硬件系统和软件系统

(C) 系统软件和应用软件 (D) 内存和外存

4.二进制数10101转换为十进制是___()____。

(A) 17 (B) 21 (C) 42 (D) 10101

5.在VB中，保存一个工程至少应保存两个文件，这两个文件分别是___()____。

(A)文本文件和工程文件 (B)窗体文件和工程文件

(C)窗体文件和标准模块文件 (D)类模块文件和工程文件

6.设a=6，则执行 x=IIf(a > 5, -1, 0) 后，x的值为___()____。

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

7.以下Case语句中错误的是__()_____。

(A) Case 0 To 10 (B) Case Is>10

(C) Case Is>10 And Is<50 (D) Case 3,5,Is>10

8.一般情况下，控件的大小是由___()___属性确定的

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

9.下列变量名中，合法的变量名是___()____。

(A)t24 (B)iun-k (C)24t (D)t+p

10.对象的三个要素是：____。

A) 属性、方法、事件 B) 色彩、高度、宽度

C)事件、属性、色彩 D) 属性、高度、宽度

11. 符号％是声明_______类型变量的类型定义符。

A)Integer B)Variant C)Single D)String

12. 以下表达式中_____与其他几个的值不同。

(A) Left(Right("ABCDEDEFG", 6), 4) (B) Right(Left("ABCDEDEFG", 7), 4)

(C) Mid("ABCDEDEFG", 4, 4) (D) String(2, "DE")

13. 设x=4，y=8，z=7，则表达式 xz) Or z

(A) 1 (B) -1 (C) True (D) False

14. 关于Name属性，以下叙述中___( )___是正确的。

(A) 窗体的Name属性指定窗体的名称，用于标识一个窗体。

(B) 窗体的Name属性用于设置显示在窗体标题栏的文本。

(C) 可以通过代码在程序运行中改变某个对象的Name属性值。

(D) 对象的Name属性值可以设置为空。

15. 要求出变量x和y中较大的一个并保存在变量Max中，下面的程序段中___( )___

是不正确的。

(A) Max = IIf(x > y, x, y) (B) If x > y Then Max = x Else Max = y

(C) Max = x

If y >= x Then Max = y (D) If y > x Then Max = y

Max = x

二、填空题（50分，每空2分，请在实验报告上标明每个空的编号）

◆下面这段程序要在窗体显示20个[100，200]间的随机整数，求这些数的和，并

显示其中5的倍数请完成程序。

For i = 1 To 20

x = Int(___[1]___) (1)Int(Rnd*101+100)

___[2 ]___ (2)s=s+x

If ___[3 ]___ (3)x mod 5=0 then print x

Next I

Print "总和："; s

◆执行下面这段程序后，窗体中显示___[4 ]___和___[5 ]___。(4) 5 (5) 5.6

s = 2

For i = 3.2 To 4.9 Step 0.8

s = s + 1

Next i

Print s, i

◆在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

x=0

Do Until x=-l

a=InputBox(＂请输入A的值＂)

a=Val(A)

b=InputBox（＂请输入B的值＂)

b=Val(B)

x=InputBox(＂请输入x的值＂)

x=Val(x)

a=a+b+x

Loop

Print a

End Sub

程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-l，则输出结果为___[ 6]____。(6)2

请完善以下判断完数的程序。一个数如果恰好等于它的因子之和，这个数就被称为“完数”。一个数的因子是指除了该数本身以外能够被其整除的数。例如6是一个完数，因为6=1+2+3。

Private Sub Command1_Click()

Dim m%, k%, i%

m = Val(Text1.Text)

k = 0