绪论 单元测试
1、单选题：以下叙述中错误的是().
A:VisualBasic应用程序不具有明显开始和结束语句
B:VisualBasic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性
C:VisualBasic中控件的某些属性只能在运行时设置
D:VisualBasic是事件驱动型可视化编程工具
正确答案:【VisualBasic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性】
2、单选题：
VB的启动有多种方法，下面不能启动VB的是（ ）.
A:使用“开始”菜单中的“程序”命令
B:使用“开始”菜单中的“运行”命令
C:在Ｗindows窗口中按下F5键
D:使用“我的电脑”，在VB所在硬盘驱动器中找到相应的VB文件夹
正确答案:【在Ｗindows窗口中按下F5键】
3、单选题：
在VB中，应用程序被称为( )。
A:工程
B:窗体
C:属性
D:对象
正确答案:【工程 】
4、单选题：在VB中，用户界面设计是在（ ）窗口中进行的。
A:窗体
B:代码
C:属性
D:工程
正确答案:【窗体】
5、单选题：MSDN的作用是（ ）。
A:提供各种控件及其代码
B:自动生成程序代码
C:包括上述各项功能
D:提供程序示例代码、技术文档等
正确答案:【提供程序示例代码、技术文档等】
第一章 单元测试
1、单选题：以下叙述中错误的是( )。
A: 以.BAS为扩展名的文件是标准模块文件
B:一个工程中可以含有多个标准模块文件
C:窗体文件包含该窗体及其控件的属性
D:在工程资源管理器, 窗口中只能包含一个工程以及属于该工程的其他文件
正确答案:【在工程资源管理器, 窗口中只能包含一个工程以及属于该工程的其他文件】
2、单选题：
VB工程文件的扩展名是（）。
A:.frx
B:.vbg
C:.frm
D:.vbp
正确答案:【.vbp】
3、单选题：
在设计阶段，当双击窗体上某个对象时，所打开的窗体是（ ）。
A:代码窗体
B:属性窗口
C:工程资源管理器窗口
D:工具箱窗口
正确答案:【代码窗体】
4、单选题：VB6.0集成开发环境有三种工作状态，不属于三种工作状态之一的是（ ）。
A:编写代码状态
B:中断状态
C:运行状态
D:设计状态
正确答案:【编写代码状态】
5、单选题：
VB6.0是一种面向（ ）的编程环境。
A:应用
B:对象
C:机器
D:过程
正确答案:【对象】
第二章 单元测试
1、单选题：以下能够触发文本框Change事件的操作是（ ）。
A:设置文本框为不可见
B:文本框失去焦点
C:改变文本框的内容
D:文本框获得焦点
正确答案:【改变文本框的内容
】
2、单选题：
Visual Basic 6.0中任何控件都有的属性是( )。
A:BorderStyle
B:BackColor
C:Name
D:Caption
正确答案:【Name】
3、单选题：确定一个窗体或控件大小的属性是( )。
A: Width 和Height
B:Top 和 Left A
C:Width 和Top
D:Top 和right
正确答案:【 Width 和Height 】
4、单选题：
刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（ ）。
A:图片框
B:通用对话框
C:单选按钮
D:文本框
正确答案:【通用对话框】
5、单选题：
VB中对象的含义是（ ）。
A:创建对象实例的模板
B:具有某些特性的具体事物的抽象
C:封装的程序
D:封装了数据和方法的实体
正确答案:【封装了数据和方法的实体】
第三章 单元测试
1、单选题：表达式7+4 6 * 5/ 8 MOD 9的值是( )。
A:7
B:8
C:6
D:5
正确答案:【8】
2、单选题：
表达式NOT(“ABC” = “ABK”) OR (“abc” = “habc”)的结果为( )。
A: “True”
B: 0
C: “False”
D: 1
正确答案:【 “True”】
3、单选题：如果想在程序中反复使用一个数据“01/01/2000”，为了避免在编写程序时反复输入这个数据，也为了一次能够修改程序中所有用到这个数据的语句，可以采用：( )
A:将这个数据声明为字符串型变量，用一个变量标识符表示它。
B:将这个数据声明为日期型常量，用一个常量标识符代表它。
C:将这个数据声明为字符串型常量，用一个常量标识符代表它。
D:将这个数据声明为日期型变量，用一个变量标识符表示它。
正确答案:【将这个数据声明为日期型常量，用一个常量标识符代表它。】
4、单选题：
下列符号中，哪一个是合法的变量名（）。
A:integer
B:sinx
C:123_a
D:1_1
正确答案:【sinx】
5、单选题：
表达式Mid$(“一二三四五六”,3,4)的结果是（）.
A: “三四”
B:”二三四五”
C: “三四五六”
D:”二三”
正确答案:【”二三”】
第四章 单元测试
1、单选题：a=3,b=5,c=IIF(a<b,10,12), 则c=( )。
A:12
B:5
C:3
D:10
正确答案:【10】
2、单选题：
“设有如下程序：Private Sub Form_Click() a = 1 For i = 1 To 3 Select Case i Case 1, 3 a = a + 1 Case 2, 4 a = a + 2 End Select Next i Print aEnd Sub程序运行后，单击窗体，则在窗体上显示的内容是（）。
A:3
B:6
C:4
D:5
正确答案:【5】
3、单选题：“下列程序段中，语句i=i+1执行了（）次。For i=1 to 5 i=i+1Next i
A:4
B:3
C:5
D:2
正确答案:【3】
4、单选题：在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1_Click()For i = 1 To 4 a = 1 For j = 1 To 3 a = 2 For k = 1 To 2 a = a + 6 Next k Next j Next iPrint aEnd Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是（ ）。
A:14
B:17
C:16
D:15
正确答案:【14】
5、单选题：设a=”Visual Basic”，下面使b=”Basic”的语句是（ ）。
A:b=Right(a,5,5)
B:b=Left(a,8,12)
C:b=Left(a,8,5)
D:b=Mid(a,8,5)
正确答案:【b=Mid(a,8,5)】
第五章 单元测试
1、单选题：若有数组说明语句为:Dim a(10),则数组a包含元素的个数是( ).
A:8
B:12
C:10
D:11
正确答案:【11】
2、单选题：已知有数组声明:Dim a(-1 To 3,2 To 5)As integer,如下引用数组中的元素,正确的是
A:a(-1,2)
B: a(0,6)
C:a[-1,2]
D: a(4)
正确答案:【a(-1,2)】
3、单选题：在窗体上添加一个命令按钮，编写如下代码：Option Base 1Private Sub Command1_Click Dim a(10) As Integer,p(3)As Integer k=5 For i=1 To 10 a(i)=i Next i For i=1 To 3 p(i)=a(i*i) Next i For i=1 To 3 k=k+p(i)*2 Next i Print kEnd Sub程序运行后，单击命令按钮，输出结果是
A:35
B:33
C:28
D:37
正确答案:【33】
4、单选题：
如下数组声明语句，正确的是
A:Dim a(3,4)%
B:Dim a(3,4)As Integer
C:Dim a[3,4]As Integer
D:Dim a(n,n) As Integer
正确答案:【Dim a(3,4)As Integer】
5、单选题：
在窗体中添加一个命令按钮,然后编写如下代码:
Private Sub Command1_Click()
ReDim this(4)
For i = 1 To 4
this(i) = i * 3
Next
ReDim this(6)
For i = 1 To 6
this(i) = this(i) + i
Next
Print this(3);this(6)
End Sub
程序运行后,则窗体上显示的内容为()
A:3 6
B:12 6
C:8 0
D:10 6
正确答案:【3 6 】
第六章 单元测试
1、单选题：下面的过程语句声明中正确的是（ ）
A:Sub f1(ByRef n%) As Integer
B:Function f1(Byval n%)
C:Sub f1(ByVal n%())
D:Function f1%(ByRef f1%)
正确答案:【Function f1(Byval n%)】
2、单选题：在一个过程中定义的变量，若希望该过程外还能保存过程中局部变量的值，则应使用关键字（）在过程中定义过程级变量。
A:Public
B:Private
C:Static
D:Dim
正确答案:【Static 】
3、单选题：下面过程运行后显示的结果是（） Public Sub F1 (ByRef n%, ByVal m%) n=n Mod 10 M=m10
End SubSub Command1_Click() Dim x%, y% X=12: y=34 Call F1(x,y) MsgBox(x & “ “ & y)End Sub
A: 12 3
B: 2 3
C:12 34
D:2 34
正确答案:【2 34】
如有任何疑问请及时联系QQ 50895809反馈
