智慧树知到《VisualBasic程序设计（海南联盟）》章节测试答案

智慧树知到《VisualBasic程序设计（海南联盟）》章节测试答案
绪论单元测试
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\10End 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 Thenp1=1；Else；If n Mod 2=1 Then；p1=x*p1（x， n\2）；Else；P1=p1（x， n\2） \xEnd 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+1Loop While i<；2End 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 iEnd 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