VB期中练习题-答案

VB单元练习题一

一、选择题

1、Visual Basic集成开发环境中不包括下列哪些窗口？（D）

A. 工具箱窗口

B. 工程资源管理器窗口

C. 属性窗口

D. 命令窗口

2、“一辆小客车在正常行进过程中被一辆大型货车撞坏了”，在这句话中，“客车”，“小”，“行进”和“被一辆大型货车撞坏了”分别对象Visual Basic中的哪些术语？（ B ）

A. 对象、属性、事件、方法

B. 对象、属性、方法、事件

C. 属性、对象、事件、方法

D. 属性、对象、方法、事件

3、对象的特征和状态特征称为？（ C ）

A. 事件

B. 方法

C. 属性

D. 类

4、下面哪一个属性用来标识对象的名称？（D ）

A. Caption

B. Value

C. Text

D. Name

5、下列哪个符号是合法的变量名? （A ）

A. VB123

B. Abs

C. 99Ji

D. x\y

6、数学式子10sin25o写成Visual Basic表达式是？（D）

A. 10sin25

B. 10*sin(25)

C. 10*sin(25o)

D. 10*sin(25*3.14/180)

7、Visual Basic中不存在下列哪一种数据类型？（D ）

A. 字符串类型

B. 日期类型

C. 逻辑类型

D. 指针类型

8、表达式Left(“Visual”,3)+Lcase(“AB”)的值是？（C）

A. visAB

B. VisAB

C. Visab

D. ualab

9、表达式6+10 Mod 4*2+1的值是？（A）

A. 9

B. 11

C. 1

D. 3

10、把数值型转换为字符串型需要使用下列哪一种函数? （B）

A. Val()

B. Str()

C. Asc()

D. Chr()

11、VB中窗体文件的扩展名是______。

(A)VBP (B)FRM(对)(C)VBW (D)PDM

12、在设计应用程序时，通过______窗口可以查看到应用程序工程中的所有组成部分。

(A)代码窗口(B)窗体设计窗口 (C)属性窗口(D)工程资源管理器窗口(对)

13、在VisualBasic中，所有的窗体和控件都必定具有的一个属性是______。

(A)Name(对)(B)Font (C)Caption (D)FillColor

14、对变量名说法不正确的是______。

(A)必须是字母开头，不能是数字或其他字符

(B)不能是VB的保留字

(C)可以包含字母、数字、下划线和标点符号(对)

(D)不能超过255个字符

15、以下变量名中，______是不符合VisualBasic的命名规范的。

(A)Abc901 (B)_mnu_Open_234(对)(C)price_ (D)K

16、在窗体上画一个命令按钮（名称为Command1），然后编写如下事件过程：

Private Sub Command1_Click()

Dim bAs Integer

b=b+1

End Sub

运行程序，三次单击命令按钮后，变量b的值是：______。

(A)0 (B)1(对)(C)2 (D)3

17、下列程序段的执行结果为______。

X=5:Y=-20

If Not X>0 Then

X=Y-3

Else

Y=X+3

Endif

Print X-Y;Y-X

(A)-3 3(对) (B)5 8 (C)3 3 (D)25 25

18、当x为偶数时，则在窗体上显示“偶数”，否则显示“奇数”，不能实现该代码段功能的是

(A)if x\2=x/2 then print"偶数" else print"奇数"

(B)if x mod2=0 then print"偶数"else print"奇数"

(C)if not x mod 2<>0 then print"偶数"else print"奇数"

(D)if x\2=int(x/2 )then print"偶数"else print"奇数"(对)

19、若要执行下列程序段后窗体上显示“红”字，则x可取的值为：

Select case int(x/10)

case2,4,6,8

print"黄"

case1,3,5,7,9

print"绿"

case else

print"红"

end select

(A)27 (B)38 (C)10 (D)5(对)

20、在程序代码中将图片文件mypic.jpg装入图片框Picture1的语句是______。

(A)Picture1.Picture="mypic.jpg"

(B)Picture1.Image="mypic.jpg"

(C)Picture1.Picture=LoadPicture("mypic.jpg")(对)

(D)LoadPicture("mypic.jpg")

21、大部分控件都没有的属性是______。

(A)Top (B)Name (C)Enabled (D)Interval(对)