? 单选
语言基础
1、与传统的程序设计语言相比，Visual Basic 最突出的特点是：
A 结构化程序设计 B 程序开发环境 C 事件驱动编程机制 D 程序调试技术
2、假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口设置窗体的属性，预先应执行的操作是：
A 单击窗体上没有控件的地方 B 单击任一个控件
C 不执行任何操作 10 D 双击窗体的标题栏 3、在Visual Basic工程中，可以 +-*作为启动对象的程序是
A 任何窗体或标准模块 B 任何窗体或过程
C Sub Main过程或其他任何模块 D Sub Main过程或任何窗体 4、以下叙述中错误的是
A 一个工程可以包括多种类型的文件
B Visual Basic应用程序既能以编译方式执行，也能以解释方式执行 C 程序运行后，在内存中只能驻留一个窗体
D 对于事件驱动型应用程序，每次运行时的执行顺序可以不一样 5、以下叙述中错误的是
A 打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件
B 保存Visual Basic程序时，应分别保存窗体文件及工程文件 C Visual Basic应用程序只能以解释方式执行 D 事件可以由用户引发，也可以由系统引发
6、如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是
A 如果工程中含有Sub Main过程，则程序一定首先执行该过程 B 不能把标准模块设置为启动模块
C 用Hide方法只是隐藏一个窗体，不能从内存中清除该窗体 D 任何时刻最多只有一个窗体是活动窗体 7、下列可以作为Visual Basic的变量名的是：
A FileName B a(A+b) C 23D D print 8、以下声明语句中错误的是
A Const var1=123 B Dim var2 = 'ABC'
C public a,b as integer D Static var3 As Integer 9、以下运算符中，不是逻辑运算符的是：
A Or B Xor C Imp D mod
10、下列选项中，把r定义为双精度型变量的是：
A r% B r! C r# D r$
11、用来将数值转换为字符串类型的函数是:
A Chr$() B Asc() C Str$() D Val()
12、在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click() X = 12345
Print Format$(X, \
End Sub
程序运行后，单击命令按钮，窗体上显示的是
A 123.45 B 12345.00 C 12345 D 00123.45 13、inputBox函数的返回值类型是：
A 数值 B 字符串
C 变体 D 数值或字符串（视输入的数据而定）
? 填空
1、在VB中，Len(“共产党”)的值是：_3______________；执行语句s=Len(Mid(\后，s的值是：__6_____________ 2、语句print “25+32”的结果是：_25+32__________________
3、设a=2,b=3,c=4,d=5，则表达式3>2*b OR a=c AND b<>c OR c>d的值是：_____false_________ ；NOT a<=c OR 4*c=b^2 AND b<>a+c的值是_____________
4、以下语句的输出结果是：_3______ a%=3.14159 Print a% 5、在VB中，工程文件的扩展名是.VBP，窗体文件的扩展名是.____ ___________。 6、在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
a = InputBox(\ b = InputBox(\ Print b + a End Sub
程序运行后，单击命令按钮，先后在两个输入框中输入123和456，则输出结果是：__456123______________
7、在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:
Private Sub Form_Click()
Text1.Text = \End Sub
Private Sub Text1_Change()
Picture1.Print \程序设计\End Sub
程序运行后,单击窗体,在图片框中显示的内容是____ VB程序设计__________________。
8、___注释_________语句是一个说明性语句，Visual Basic不对它们进行编译，
该语句不参与程序运行。
9、在Visual Basic中，字符串常量用___#________括起来，日期/时间型常量要用_____________括起来。
10、在VB中，当窗体被装入内存时，系统将自动执行__load_ _____事件过程。 11、Visual Basic应用程序通常由3类模块组成，即窗体模块、类模块____________和标准模块。
12、在VB中，如果要改变窗体的标题，则需要设置的属性是
13、100%表示100为_____整________型数据；100！表示为_单精度___________型数据。
14、在VB中，标准模块中的代码存放在以bas.____ ____为扩展名的文件中。 15、在VB中，将窗体Form1隐藏起来的语句是：Form1.__hide_________
流程控制
? 单选题
1、下列语句中，能交换变量a和b的值的是：
A t=a:b=a:a=t B a=a+b:b=a-b:a=a-b C t=a:a=b:b=t D a=b:b=a 2、设a=6，则执行 X=IIf(a>5,-1,0) 后，x的值为：
A 5 B 6 C 0 D -1 3、结束当前运行程序的语句是：
A Quit B Exit C Exit Sub D End 4、以下Case语句中错误的是
A Case 0 To 10 B Case Is>10
C Case Is>10 And Is<50 D Case 3,5,Is>10 5、设有以下循环结构
Do
循环体
Loop While <条件> 则以下叙述中错误的是
A 若\条件\是一个为0的常数，则一次也不执行循环体 B \条件\可以是关系表达式、逻辑表达式或常数 C 循环体中可以使用Exit Do语句
D 如果\条件\总是为True，则不停地执行循环体 6、有程序段如下：
X%=2
Do while x<8 Print “*”; X=x+2
Loop
执行后的输出结果是： A * B ** C *** D **** 7、假定有以下程序段 For i = 1 To 3
For j = 5 To 1 Step -1 Print i * j Next j, i
则语句Print i * j的执行次数是：
A 15 B 16 C 5 D 8 8、执行以下程序段后，x的值为
Dim x As Integer, i As Integer x=0
For i = 20 To 1 Step –3 x = x + i \\ 5 Next I
A 16 B 17 C 13 D 19
? 填空
1、以下语句的输出结果是__ shaingha ___________ S$=”beijing” S$=”shaingha” Print s
2、设有程序段：
Dim k% K=5
Do until k=0 K=k-1 Loop
执行循环体的次数是：______5________次。
3、下面程序段中，循环语句的执行次数是_______4______次。 For x = 10 To 1 Step -3
Print x Next x
4、执行语句For x = 1 To 3：x = x + 1：Next x后，变量x的值是__5__________。 5、在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程：
Private Sub Command1_Click() n = Text1.Text Select Case n
Case 1 To 20
x = 10
Case 2, 4, 6 x = 20
Case Is < 10 x = 30 Case 10 x = 40 End Select
Text2.Text = x End Sub
程序运行后，如果在文本框Text1中输入5，然后单击命令按钮，则在Text2中显示的内容是： ? 阅读程序
1、Private Sub Command1_Click() Dim x%, y%
x = InputBox(\请输入x的值：\Select Case x Case 1, 3, 5 y = x - 1 Case 6 To 10 y = x + 1 Case 2, 4 y = x * 2 Case Is > 10 y = x * x + 1 End Select
Print \End Sub
2、当x的值输入为10时，运行结果： 有程序段：
x% = 2
Do While x < 10 Print \ x = x + 2 Loop
执行之后，输出的结果是：________________
3、在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
Dim i As Integer, x As Integer For i = 1 To 6
If i = 1 Then x = i If i <= 4 Then x = x + 1 Else
