2021知到答案 Visual Basic 程序设计（海南联盟） 智慧树网课章节测试答案

第一章 章节测试

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】[/$]