10，下列选项中，____A____属于可视化的面向对象程序设计语言。

A) Visual BasicB) CC) FoxBaseD) Basic11，在程序代码中设置属性的方法如下_____C___。

A) 属性=值B) 对象属性=值C) 对象.属性=值D) 属性.对象=值12，如果在窗体上画一个命令按钮Command1，然后，编写如下事件过程：Private Sub Command1_Click()Dim i, x As IntegerFor i=1 To 6If i=1 Then x=iIf i<=4 Thenx=x+1Elsex=x+2End IfNext i?xEnd Sub那末，程序运行后，单击命令按钮，窗体上显示的结果是AA) 9B) 6C) 12D) 1513，决定一个控件在窗体上位置的属性是______D__。

A) Width或HeightB) Width和HeightC) Top或LeftD) Top和Left14，以下为合法的对象名的是___A_____。

A) 姓名B) nameC) 1buttonD) _name15，下面不合法的标识符是________A) Go_ToB) Tab1C) 名称D) Int16，如果在窗体上画一个命令按钮C1和一个标签L1，然后，编写如下事件过程：Private Sub C1_Click()c=0For i=1 To 4For j=6 To 1 Step -2c=c+1Next jNext iL1.Caption=Str(c)End Sub那末，程序运行后，单击命令按钮，标签中显示的结果是BA) 11B) 12C) 16D) 2017，下列选项中，不属于Visual Basic特点的是___D_____。

A) 可视化编程B) 事件驱动的编程机制C) 面向对象的程序设计D) 面向过程的程序设计18，如果在窗体上画一个命令按钮Command1，然后，编写如下事件过程：Private Sub Command1_Click()Dim i, x As Integerx=0For i=20 To 1 Step -2x=x+i\5Next i?xEnd Sub那末，程序运行后，单击命令按钮，窗体上显示的结果是CA) 16B) 17C) 18D) 1919，如果在窗体上画一个命令按钮C1和一个文本框T1，然后，编写如下事件过程：Private Sub C1_Click()Dim i As IntegerFor i=0 To 50i=i+3n=n+1if i>10 Then Exit ForNext iT1.Text=nEnd Sub那末，程序运行后，单击命令按钮，文本框中显示的结果是CA) 5B) 4C) 3D) 220，若使标签框根据所显示内容自动调整其大小，则可以通过设置哪个属性值为True来实现AA) AutoSizeB) AlignmentC) EnabledD) Visible21，如果在窗体上画一个命令按钮C1，然后，编写如下事件过程：Private Sub C1_Click()a=0For i=1 To 2For j=1 To 4If j Mod 2<>0 Thena=a-1End Ifa=a+1Next jNext i?aEnd Sub那末，程序运行后，单击命令按钮，窗体上显示的结果是DA) 0B) 2C) 3D) 422，若要得到列表框中项目的数目，可以访问哪个属性CA) ListB) ListIndexC) ListCountD) Text23，下面选项中哪个是算术运算符CA) %B) &C) ModD) And24，窗体的单击事件过程如下：Private Sub Form_Click()Dim check,countercheck=truecounter=0DoDo While counter<20counter=counter+1If counter=10 Thencheck=FalseExit DoEnd IfLoopLoop Until check=False?counter,checkEnd Sub程序运行后，单击窗体，窗体上显示的结果是DA) 15 0B) 20 -1C) 10 TrueD) 10 False25，代码窗口中___D____。

A) 既无对象列表框，也无过程列表框B) 有对象列表框，无过程列表框C) 无对象列表框，有过程列表框D) 既有对象列表框，又有过程列表框26，以下不正确的单行结构条件语句是_____D___A) If x>y Then Print(“x>y”)B) If x Then t=t*xC) If x Mod 3=2 Then ? xD) If x<0 Then y=2*x-1:Print x End If27，以下关于对象属性正确的说法是____D____。

A) 在设计模式和运行模式下都不能设置对象的属性B) 对象的属性在设计模式是可以设置，在运行模式下不能设置C) 对象的属性在运行模式下可以设置，在设计模式下不能设置D) 对象的属性既可以在设计模式下设置，也可以在运行模式下设置28，For循环语句的循环控制变量用于AA) 控制循环次数B) 求和C) 计算步长D) 递增29，循环语句用于控制循环体的BA) 顺序执行B) 重复执行C) 选择执行D) 不执行30，10 Mod 4的值为___B_____A) 1B) 2C) 4D) 10判断题1，在窗体显示之前，执行窗体的加载事件过程Form_Load()。

T2，调整图形大小时，在图片框中，利用 Stretch属性调整图片框大小适应图片；在图像框中，利用AutoSize 属性调整图片大小适应图像框。

F3，前测型Do...Loop语句执行循环体的最少次数为1。

F4，无论是窗体还是控件都只有获得焦点才能接受键盘事件。

T 5，3434&是长整形数据类型。

T6，语句是程序代码中最小的可运行单元。

7，Visual Basic环境中的立即窗口可以进行各种命令的操作。

F8，循环结构用于描述重复计算问题。

T9，Not 10-5>12+3 And 3*2=6 Or 5<=3的值是True。

T10，循环嵌套称为多重循环。

T11，只有在If语句和每一个ElseIf语句计算相同表达式时，才能用Select Case结构替换If结构。

T12，循环语句不允许嵌套，只能交叉。

F13，一个Visual Basic程序也称为一个工程，由窗体、标准模块、自定义模块及应用所需的环境设置组成。

14，设置命令按钮控件的快捷键可以在其Caption属性的时某字母前加"&"符号。

15，循环控制流程和循环语句往往称为顺序结构。

16，给对象取名时，可以用汉字、字母、数字和下划线。

17，在调用对象方法时，不能省略对象名。

18，循环是按照给定条件重复执行一组语句。

19，循环语句“For Each 元素 In 集合...Next”用于“对集合中的每个元素或对象，重复执行一组语句”。

20，全局符号常量只能在标准模块的声明段中声明，而不允许在窗体模块中声明，但在该程序的所有模块中都可直接使用。

填空题1，表达式Fix(-11.85)+Int(-23.01)的值是________。

2，当窗体的Enabled属性为________时，指定窗体响应事件。

3，若希望在启动应用程序时对属性和变量进行初始化，可以使用窗体的________事件。

4，设有以下循环：x=1Dox=x+________Print xLoop Until x=7要求循环体可执行3次，请填空。

5，在Visual Basic 6.0中，对象都具有特定的属性，在设计模式可以通过________窗口来设置。

6，设有以下过程：Private Sub Form_Click()Dim a,s As Integern=8s=0Dos=s+nn=n-1Loop While n>0?sEnd Sub程序运行后，单击窗体，窗体上显示的结果为________。

7，若用如下程序来判断a是否为素数：Private Sub Command1_Click()Dim a,k,isprime As Integera=Val(InputBox("请输入一个整数"))If a<2 Thenisprime=FalseElseisprime=Truek=2Do While k<a/2 And isprimeIf a Mod k=0 Thenisprime=FalseElsek=k+1End IfLoopEnd IfIf isprime ThenPrint a;"是素数!"ElsePrint a;"不是素数!"End IfEnd Sub则在测试时，发现有个非素数也被判断为素数，这个错判的数是________。

8，对于窗体上的命令按钮，如果不允许进行操作，应通过________属性进行设置9，如果在窗体上画一个命令按钮Command1，然后，编写如下事件过程：Private Sub Command1_Click()Dim k,sum As Integersum=0For k=10 To 1 Step -2sum=sum+kNext k?sumEnd Sub那末，程序运行后，单击命令按钮，其窗体上显示的结果为________。

10，Visual Basic中的数据类型可分为________和用户自定义数据类型两大类。

第二章1.文本框没有哪个属性A) BackColorB) EnabledC) VisibleD) Caption2.当在窗体上放置一个控件时，就________。

A) 将类转换为对象B) 将对象转换为类C) 将变量转换为对象D) 将对象转化为变量3.若要得到列表框中项目的数目，可以访问哪个属性A) ListB) ListIndexC) ListCountD) Text4.在Visual Basic中，不能隐藏的窗口是________。

A) 属性窗口B) 主窗口C) 窗体窗口D) 代码窗口5.窗体的单击事件过程如下：Private Sub Form_Click()Dim x, n As Integerx=1n=0Do While x<28x=x*3n=n+1LoopPrint x,nEnd Sub程序运行后，单击窗体，窗体上显示的结果是A) 81 4B) 56 3C) 28 1D) 243 56.改变控件的Tab顺序可以修改哪个属性值A) VisibleB) EnabledC) TabStop D) TabIndex7.下面程序段中循环语句的循环次数是________For x=10 to 1 step -3Print xNext xA) 0B) 4C) 5D) 108.对象事件过程名格式如下________。