内容发布更新时间 : 2024/6/2 6:19:00星期一 下面是文章的全部内容请认真阅读。

09vb模拟测试卷

满分：70分

姓名：________

1、单项选择题(本题共计40分)

1、VisualBasic是用于开发________环境下的应用程序的工具。 ( )

A、DOS B、Windows C、DOS和Windows D、UNIX

2、对象在响应某个事件时，计算机要执行一段程序，以完成相应的操作，这样的程序片段叫做 ____过程。 ( )

A、方法 B、事件 C、调动 D、编译

3、VisualBasic中的窗体文件的扩展名是____________。 ( )

A、.reg B、.frm C、.bas D、.vbp

4、一只白色的足球踢进球门，则白色、足球、踢、进球门是________。 ( )

A、属性、对象、方法、事件 B、属性、对象、事件、方法 C、对象、属性、方法、事件 D、对象、属性、事件、方法

5、下面________语句，可以将列表框List1中当前选定的列表项的值替换成“ABC”。 ( )

A、List1.AddItem“ABC”，List1.ListIndex B、List1.Text=“ABC”

C、List1.List(List1.ListIndex)=“ABC” D、前三项均可

6、在VB中，下列关于控件的属性或方法中，搭配错误的有________个。 ①Timer1.Interval ②List1.Cls ③Text1.Print ④List1.RemoveItem ⑤Vscroll1.Value ⑥Picture1.Print ( )

A、0 B、1 C、2 D、3

7、当对象失去焦点时，将会发生____________事件。 ( )

A、GetFocus B、LostFocus C、Focus D、SetFocus

8、对于一个含有计时器控件的窗体，每经过一段由________属性指定的时间间隔，就会产生一个Timer事件。 ( )

A、Name B、Enabled C、Caption D、Interval

9、在设计列表框时，若实现输入多行文字的目的，应使用____________键实现文本的换行。 ( )

A、Enter B、Alt+Enter C、Ctrl+Shift+Enter D、Ctrl+Enter

10、将数据项“China”添加到列表框(Listl)中成为第一项应使用____________语句。 ( )

A、Listl.Addltem \B、Listl.Addltem \C、Listl.Addltem 0,\D、Listl.Addltem 1,\

11、函数Cint(–3.5)，Int(–3.5)，Fix(–3.5)的值分别是________。 ( )

A、-3，–4，–3 B、-4，–4，–3 C、-3，–4，–4 D、-4，–3，–3

12、假定变量Logic类型是Boolean，下面赋值语句________是正确的。 ( )

A、Logic = ‘True’ B、Logic = .True. C、Logic = # True # D、Logic = 3<4

13、下列语句中不能正常执行的是________。 ( )

A、print +32758+10 B、print 5+9=15 C、print \D、print \

14、在窗体Form1上画两个文本框（Name属性分别为Fext1和Text2）和一个命令按钮（Name属性为Command1），程序如下。执行后结果为___________。

Private Sub Command1_Click() a=Text1.Text+Text2.Text Print a End Sub

Private Sub Form_load()

Text1.Text=\Text2.Text=\End Sub ( )

A、444 B、321123 C、123321 D、132231

15、语句Print 4 + 5\\6*7/8 Mod 9的值是____________。 ( )

A、4 B、5 C、6 D、7

16、不能正确表示条件“两个整型变量X和Y之一为0，但不能同时为0”的布尔表达式是________。 ( )

A、X*Y=0 And (X<>0 Or Y<>0) B、( X=0 Or Y=0 ) And (X<>0 Or Y<>0) C、Not ( (X=0 Or Y=0) And (X<>0 Or Y<>0) ) D、X*Y=0 And X+Y<>0

17、i被j整除的逻辑表达式是________________。 ( )

A、i/j = 0 B、i\\j = 0 C、i<>0 D、i mod j = 0

18、如果文本框的Enable属性被设置为False,则运行时_________ . ( )

A、文本框中的文本将变成灰色，并且此时用户不能将光标置于文本框上

B、文本框中的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框

中的内容

C、文本框中的文本将变成灰色，用户仍能改变文本框中的内容

D、文本框中文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容 19、下列表达式中，值为True的是________。 ( )

A、UCase(\B、14/2\\3>10 MOD 4

C、Mid(“ABCD”,2,2)>Left(“ABCD”,2) D、not(Sqr(4)-3>= -2)

20、执行下面的程序，单击窗体后在窗体上显示的结果是________。 Private Sub Form_Click()

Dim Strl As String, Str2 As String,I As Integer Str1=”ab”

For I=Len(Str1)To 1 Step-1

Str1=Str1&Chr(Asc(Mid(Str1,I,1))+I) Next I Print Str1 End Sub ( )

A、abce