绪论 单元测试
1、问题:以下叙述中错误的是().
选项：
A:VisualBasic中控件的某些属性只能在运行时设置
B:VisualBasic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性
C:VisualBasic应用程序不具有明显开始和结束语句
D:VisualBasic是事件驱动型可视化编程工具
答案: 【VisualBasic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性】
2、问题:
VB的启动有多种方法，下面不能启动VB的是（ ）.
选项：
A:在Ｗindows窗口中按下F5键
B:使用“我的电脑”，在VB所在硬盘驱动器中找到相应的VB文件夹
C:使用“开始”菜单中的“运行”命令
D:使用“开始”菜单中的“程序”命令
答案: 【在Ｗindows窗口中按下F5键】
3、问题:
在VB中，应用程序被称为( )。
选项：
A:窗体
B:属性
C:对象
D:工程
答案: 【工程 】
4、问题:在VB中，用户界面设计是在（ ）窗口中进行的。
选项：
A:代码
B:窗体
C:属性
D:工程
答案: 【窗体】
5、问题:MSDN的作用是（ ）。
选项：
A:提供程序示例代码、技术文档等
B:包括上述各项功能
C:自动生成程序代码
D:提供各种控件及其代码
答案: 【提供程序示例代码、技术文档等】
第一章 单元测试
1、问题:以下叙述中错误的是( )。
选项：
A:在工程资源管理器, 窗口中只能包含一个工程以及属于该工程的其他文件
B: 以.BAS为扩展名的文件是标准模块文件
C:一个工程中可以含有多个标准模块文件
D:窗体文件包含该窗体及其控件的属性
答案: 【在工程资源管理器, 窗口中只能包含一个工程以及属于该工程的其他文件】
2、问题:
VB工程文件的扩展名是（ ）。
选项：
A:.vbg
B:.frx
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:Name
B:Caption
C:BackColor
D:BorderStyle
答案: 【Name】
3、问题:确定一个窗体或控件大小的属性是( )。
选项：
A:Top 和 Left A
B:Top 和right
C:Width 和Top
D: Width 和Height
答案: 【 Width 和Height 】
4、问题:
刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（ ）。
选项：
A:通用对话框
B:图片框
C:文本框
D:单选按钮
答案: 【通用对话框】
5、问题:
VB中对象的含义是（ ）。
选项：
A:封装了数据和方法的实体
B:封装的程序
C:创建对象实例的模板
D:具有某些特性的具体事物的抽象
答案: 【封装了数据和方法的实体】
第三章 单元测试
1、问题:表达式7+4 \ 6 * 5/ 8 MOD 9的值是( )。
选项：
A:5
B:6
C:7
D:8
答案: 【8】
2、问题:
表达式NOT(“ABC” = “ABK”) OR (“abc” = “habc”)的结果为( )。
选项：
A: 1
B: “False”
C: “True”
D: 0
答案: 【 “True”】
3、问题:如果想在程序中反复使用一个数据“01/01/2000”，为了避免在编写程序时反复输入这个数据，也为了一次能够修改程序中所有用到这个数据的语句，可以采用：( )
选项：
A:将这个数据声明为日期型常量，用一个常量标识符代表它。
B:将这个数据声明为字符串型常量，用一个常量标识符代表它。
C:将这个数据声明为字符串型变量，用一个变量标识符表示它。
D:将这个数据声明为日期型变量，用一个变量标识符表示它。
答案: 【将这个数据声明为日期型常量，用一个常量标识符代表它。】
4、问题:
下列符号中，哪一个是合法的变量名（）。
选项：
A:1_1
B:123_a
C:sinx
D:integer
答案: 【sinx】
5、问题:
表达式Mid$(“一二三四五六”,3,4)的结果是（）.
选项：
A: “三四”
B:”二三”
C:”二三四五”
D: “三四五六”
答案: 【”二三”】
第四章 单元测试
1、问题:a=3,b=5,c=IIF(a<b,10,12), 则c=( )。
选项：
A:12
B:3
C:5
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:6
B:3
C:4
D:5
答案: 【5】
3、问题:”下列程序段中，语句i=i+1执行了（）次。For i=1 to 5 i=i+1Next i
选项：
A:4
B:3
C:2
D:5
答案: 【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:16
B:17
C:15
D:14
答案: 【14】
5、问题:设a=”Visual Basic”，下面使b=”Basic”的语句是（ ）。
选项：
A:b=Right(a,5,5)
B:b=Left(a,8,12)
C:b=Mid(a,8,5)
D:b=Left(a,8,5)
答案: 【b=Mid(a,8,5)】
第五章 单元测试
1、问题:若有数组说明语句为:Dim a(10),则数组a包含元素的个数是( ).
选项：
A:11
B:8
C:10
D:12
答案: 【11】
2、问题:已知有数组声明:Dim a(-1 To 3,2 To 5)As integer,如下引用数组中的元素,正确的是
选项：
A:a(-1,2)
B: a(0,6)
C: a(4)
D:a[-1,2]
答案: 【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)As Integer
B:Dim a(3,4)%
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:12 6
B:10 6
C:8 0
D:3 6
答案: 【3 6 】
第六章 单元测试
1、问题: 下面的过程语句声明中正确的是（ ）
选项：
A:Sub f1(ByVal n%())
B:Function f1%(ByRef f1%)
C:Sub f1(ByRef n%) As Integer
D:Function f1(Byval n%)
答案: 【Function f1(Byval n%)】
2、问题:在一个过程中定义的变量，若希望该过程外还能保存过程中局部变量的值，则应使用关键字（）在过程中定义过程级变量。
选项：
A:Static
B:Private
C:Dim
D:Public
答案: 【Static 】
3、问题:下面过程运行后显示的结果是（ ） Public Sub F1 (ByRef n%, ByVal m%) n=n Mod 10 M=m\10
End SubSub Command1_Click() Dim x%, y% X=12: y=34 Call F1(x,y) MsgBox(x & “ “ & y)End Sub
选项：
A: 2 3
B:2 34
C: 12 3
D:12 34
答案: 【2 34】
4、问题:
如下程序的运行结果是（）Sub Command1_Click ( ) MsgBox (p1(3.0, 7))End SubPublic Function p1! (ByVal x!, ByVal n%) If n=0 Then
p1=1 Else If n Mod 2=1 Then p1=x*p1(x, n\2) Else P1=p1(x, n\2) \x
End if
End ifEnd Function
选项：
A:27
B:18
C:14
D:7
答案: 【27】
5、问题:如下程序运行后各变量的值依次为（）Public Sub Proc (ByRef a%())
Static i%
Do
a(i)=a(i)+a(i+1)
I=i+1
Loop While i<2
End Sub
Sub Command1_Click ( )
Dim m%, i%, x%(10)
For i=0 To 4: x(i)=i+1: Next i
For i=1 To 2: Call Proc(x): Next i
For i=0 To 4: Print x(i);: next i
End sub
选项：
A: 3 5 7 4 5
B: 4 5 6 7 8
C:3 4 7 5 6
D:2 3 4 4 5
答案: 【 3 5 7 4 5 】
第七章 单元测试
1、问题:将数据项“China”添加到列表框List1中成为第二项应使用( )语句。
选项：
A:List1.AddItem 2,“ China ”
B:List1.AddItem “China”,1
C:List1.AddItem “ China ”, 2
D:List1.AddItem 1,“China”
答案: 【List1.AddItem “China”,1 】
2、问题:
引用列表框List1最后一个数据项，应使用( )语句。
选项：
A:List1.List(ListCount)
B:List1.List(List1.ListCount-1）
C:List1.List(List1.ListCount）
D:List1.List(ListCount-1)
答案: 【List1.List(List1.ListCount-1）】
3、问题:
执行了下面的程序后，列表框中的数据项有( )。
Private Sub Form_Click()
For i = 1 to 6
List1.AddItem i
Next i
For i = 1 to 3
List1.RemoveItem i
Next i
End Sub
选项：
A:4，5，6
B:2，4， 6
C:1，3，5
D:1，5，6
答案: 【1，3，5】
4、问题:
在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100，程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值。以下能实现上述操作的程序段是 ( ).
选项：
A:
Private Sub HScroll1_Change()
Text1.Text = HScroll1.Caption
End Sub
B:
Private Sub HScroll1_Click()
Text1.Text = HScroll1.Value
End Sub
C:
Private Sub HScroll1_ Dblclick ()
Text1.Text = HScroll1.Value
End Sub
D:
Private Sub HScroll1_Change()
Text1.Text = HScroll1.Value
End Sub
答案: 【
Private Sub HScroll1_Change()
Text1.Text = HScroll1.Value
End Sub】
5、问题:
设置计时器的时间间隔可以通过( )属性来实现。
选项：
A:Value
B:Max
C:InterVal
D:Text
答案: 【InterVal】
第八章 单元测试
1、问题:下面关于顺序文件的说法中正确的是（ ）
选项：
A:可通过编程对文件中的某条记录进行修改
B:文件的组织结构复杂
C:数据只能以ASCII码形式存放在文件中，可通过文本编辑软件显示
D:每条记录的长度必须相同
答案: 【数据只能以ASCII码形式存放在文件中，可通过文本编辑软件显示】
2、问题: 如果从数据文件 INPUT.DAT 中读取数据时,以下打开文件方式中, 正确的是（）
选项：
A:OPEN INPUT.DAT FOR OUTPUT AS #1
B:OPEN “I”, #1 INPUT.DAT
C:OPEN INPUT.DAT FOR INPUT AS #1
D:OPEN “INPUT.DAT” FOR INPUT AS #1
答案: 【OPEN “INPUT.DAT” FOR INPUT AS #1】
3、问题:执行语句Open ” Tel.dat” For Random As #1 Len = 50后，对文件Tel.dat的数据可以进行的操作是（）
选项：
A:只能写，不能读
B:既可以读，也可以写
C:不能读, 不能写
D:只能读，不能写
答案: 【既可以读，也可以写】
4、问题:
要从磁盘上读入一个文件名为”c:\t1.txt”的顺序文件，以下正确的是（）
选项：
A:F=”c:\t1.txt” Open “F” For Output As #2
B:Open “c:\t1.txt” For input As #2
C:F=”c:\t1.txt” Open F For Append As #2
D:Open c:\t1.txt For input As #2
答案: 【Open “c:\t1.txt” For input As #2】
5、问题:
下列哪一组语句能够实现将文本框Text1的全部内容一次性写入文件（）
选项：
A:
Open “Text.dat” For Output As #1
For I= 1 to Len(Text1.text)
Print #1 Mid(Text1.text,I,1)
Next I
Close #1
B:
Open “Text.dat” For Output As #1
Print #1 Text1.text
Close #1
C:
Open “Text.dat” For Input As #1
Print #1 Text1.text
Close #1
答案: 【
Open “Text.dat” For Output As #1
For I= 1 to Len(Text1.text)
Print #1 Mid(Text1.text,I,1)
Next I
Close #1】
#版权声明# 本站所有资源来自网络收集和网友投稿，不代表大学题库立场。本站所提供资源均只能用于参考学习用，请勿直接商用。如若本站内容侵犯了您的合法权益，可联系我们进行删除处理。点我联系站长
