Visual Basic程序设计-知到答案、智慧树答案

第一章 单元测试

1、问题:以下关于VB语言的说法中，正确的是（  ）。
选项：
A:VB是一种低级语言
B:VB是一种机器语言
C:VB是一种面向过程的语言
D:VB是一种面向对象的语言
答案: 【解锁可见】

2、问题:在Visual Basic环境下，当写一个新的Visual Basic程序时，所做的第一件事是（  ）。
选项：
A:进入Visual Basic环境
B:编写代码
C:打开属性窗口
D:新建一个工程
答案: 【解锁可见】

3、问题:以下可以构成语句的是（  ）。
选项：
A:对象名.属性
B:对象名.方法名
C:对象名.函数名
D:对象名.事件名
答案: 【解锁可见】

4、问题:（  ）是由Visual Basic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。
选项：
A:属性
B:文件
C:窗体
D:方法
答案: 【解锁可见】

5、问题:下列不是Visual Basic 文件的是（  ）。
选项：
A:*.cls文件
B:*.bas  
C:*.frm文件
D:*.txt
答案: 【解锁可见】

6、问题:下列不能打开工具箱窗口的操作是(　　)。 
选项：
A:执行“视图”菜单中的“工具箱”命令
B:按Alt+V，然后按Alt+X键
C:按Alt+F8键
D:单击工具栏上的“工具箱”按钮
答案: 【解锁可见】

7、问题:下列可以打开立即窗口的操作是(　　)。

选项：
A:Ctrl+D
B:Ctrl+G
C:Ctrl+E
D:Ctrl+F
答案: 【解锁可见】

8、问题:Visual Basic6.0集成环境的主窗口中不包括(　　)。 
选项：
A:工具栏
B:状态栏
C:标题栏
D:菜单栏
答案: 【解锁可见】

9、问题: 在Visual Basic中，不能关闭的窗口是(　　)。
选项：
A:属性窗口
B:窗体设计器窗口
C:工程窗口
D:立即窗口
答案: 【解锁可见】

10、问题: Visual Basic是一种面向对象的可视化程序设计语言，采取了(　　)的编程机制。
选项：
A:从窗体开始执行
B:事件驱动
C:按书写顺序执行
D:从主程序开始执行
答案: 【解锁可见】

第二章 单元测试

1、问题:下列符号常量的声明中，（  ）是不合法的。

选项：
A:Const a =“OK”
B:Const a As Single=1.1
C:Const a As Integer=“12”

D:Const a As Double=Sin（1） 
答案: 【解锁可见】

2、问题:表达式“Turbo”+“c”>“Ture”+“Basic”的值是（  ）。
选项：
A:出错信息
B:True
C:False
D:Null
答案: 【解锁可见】

3、问题:执行下列语句后，V的值是（  ）。

A=“56789”    V=Val（Mid（A，3，2））
选项：
A:89
B:78
C:67
D:0
答案: 【解锁可见】

4、问题:表达式4+56*7/8 Mod 4的值是（  ）。
选项：
A:6
B:7
C:4
D:5
答案: 【解锁可见】

5、问题:下列符号（  ）是Visual Basic中合法的变量名。

选项：
A:8xy  
B:X8[B]
C:x23
D:END  
答案: 【解锁可见】

6、问题:在一行内写多条语句时，每个语句之间用（  ）来分隔。  
选项：
A:：  
B:、  
C:；
D:，  
答案: 【解锁可见】

7、问题:在VB中，用Single来表示的数据类型是（  ）。


选项：
A:长整型
B:字符型
C:单精度型
D:逻辑型  
答案: 【解锁可见】

8、问题: 下列程序段的运行结果是（  ）。
Dim A As Integer , B As Integer
A = 15
B = 4
Print 4 + A B 

选项：
A:7.75
B:7
C:8
D:-7
答案: 【解锁可见】

9、问题: 三种逻辑运算符号优先次序为（  ）。

选项：
A:AND、NOT、OR       
B:OR、NOT、AND
C:NOT、OR、AND    

D:NOT、AND、OR      
答案: 【解锁可见】

10、问题: 数学式3abc(d+e)改写为VB表达式为（  ）。

选项：
A:3abcd +3abce      
B:3a*b*c(d+e)       
C:3*a*b*c*(d+e)
D:3abc(d+e)   

答案: 【解锁可见】

第三章 单元测试

1、问题:结构化程序设计的三种基本结构不包括（ ）。

选项：
A:循环结构
B:选择结构
C:顺序结构
D:倒序结构
答案: 【解锁可见】

2、问题:下面四个语句中，能打印显示20*30字样的是（  ）。

选项：
A:Print 20*30
B:Print Chr(20)+“*”+Chr(30)
C:Print val(“20”)*val(“30”)
D:Print“20*30”
答案: 【解锁可见】

3、问题:关于MsgBox函数，以下说法不正确的是（  ）。

选项：
A:“标题”参数可选，显示在对话框标题栏中的字符串表达式
B:“提示”参数用于在MsgBox函数产生的对话框内显示提示信息
C:MsgBox函数的返回值是一个字符串，这个字符串与所选择的命令按钮有关
D:“按钮”参数是数值表达式，是表示指定显示按钮的数目和类型、使用的图标样式，默认按钮的标识以及消息框样式的数值的总和
答案: 【解锁可见】

4、问题:语句If x=1 Then y=1,下列说法正确的是(  )。


选项：
A:x=1为关系表达式,y=1为赋值语句

B:x=1和y=1均为赋值语句
C:x=1为赋值语句, y=1为关系表达式

D:x=1和y=1均为关系表达式
答案: 【解锁可见】

5、问题:下面程序段执行结果为(  )。                x = 5 : y = -6If not x > 0 Then      x = y – 3 Else      y = x + 3End IfPrint  x – y; y – x

选项：
A:-3  3
B:-6  5
C:3  -3
D:5  -9
答案: 【解锁可见】

6、问题:编写如下事件过程:   Private Sub Form_Click()    score=Int(Rnd*10)+80     Select Case score          Case Is<  60             a$=”F”          Case 60 To 69         a$=”D”          Case 70 To 79         a$=”C”             Case 80 To 89         a$=”B”          Case Else         a$=”A”     End Select    Print a$   End Sub    程序运行后,单击窗体,则窗体上显示的内容是( )。

选项：
A: A
B: C
C: B
D: D
答案: 【解锁可见】

7、问题:循环结构For I%= -1 to –17  Step –2 共执行( )次。

选项：
A: 8
B: 6
C: 9
D: 5
答案: 【解锁可见】

8、问题:下列程序段的执行结果为( )。 a=0:b=1 Do    a=a+b     b=b+1 Loop While a<10 Print a;b 
选项：
A: 0  1
B: a  b
C: 10  30
D: 10  5
答案: 【解锁可见】

9、问题:有如下程序,运行后输出的结果是( )。j=0:n=0 Do While  n<3      j=(j+1)*(j+2)     n=n+1 Loop Print j;n 
选项：
A: 30  4
B: 182  3
C: 3  3
D: 0  1
答案: 【解锁可见】

10、问题:下列的程序段执行后,x的值为( )。x=0 For i=1 To 10    For j=i To 10         x=x+1     Next j Next i


选项：
A: 5
B: 105
C: 55
D: 50
答案: 【解锁可见】

第四章 单元测试

1、问题:以下关于静态数组的描述正确的是（   ）。
选项：
A:

静态数组的大小是可变的，但所有数组元素的类型必须相同
B:

静态数组的大小是固定的，可以有不同类型的数组元素
C:

静态数组的大小是可变的，可以有不同类型的数组元素
D:

静态数组的大小是固定的，所有数组元素的类型必须相同
答案: 【解锁可见】

2、问题:执行下面程序段后，输出的结果为（  ）。    Dim m(5) As Integer    s = 0    For i = 0 To 5        m(i) = 5    Next i    For j = 0 To 5        s = s + m(j)    Next j

 Print s
选项：
A:

30
B:

25
C:

20
D:

35
答案: 【解锁可见】

3、问题:下面程序：Private Sub Form_Click()    Dim a(100) As Integer    For i = 1 To 10        j = i * i        a(j) = j    Next i    Print a(25)End Sub运行后，单击窗体，则输出的结果是（   ）。
选项：
A:

36
B:

25
C:

49
D:

81
答案: 【解锁可见】

4、问题:

有如下语句：

Option Base 1

Private Sub Command1_Click()

    Dim A(2, -1 To 1) As Integer

    ……

End Sub 以上语句所定义的数组A为（   ）维数组，共有（   ）个元素，第一维下标从（   ）到（   ），第二维下标从（   ）到（   ）。
选项：
A:

6,2,1,2,-1,1
B:

2,1,6,-1,1,2
C:

1,2,6,2,-1,1
D:

2,6,1,2,-1,1
答案: 【解锁可见】

5、问题:有如下程序：    Const n = -5    Const m = 6    Dim a(n To m) As Integer    For i = LBound(a, 1) To UBound(a, 1)        a(i) = i    Next i    Print a(LBound(a, 1)); a(UBound(a, 1))运行后输出的结果为（   ）。
选项：
A:

 0  6
B:

 0  0  
C:

-5  0  
D:

-5  6   
答案: 【解锁可见】

6、问题:下面关于控件数组与一般控件的叙述中正确的是（   ）。 
选项：
A:

控件数组一定有1个以上同类型的控件组成，而一般控件只有一个控件
B:

控件数组的Index值为1，而一般控件的Index值为0 
C:

控件数组的索引属性值Index值为0，而一般控件的Index值为空 
D:

控件数组的建立通过Dim语句声明，而一般控件不需要声明
答案: 【解锁可见】

7、问题:如果要对已经声明的数组重新定义大小，并保留原有数据，可以使用语句（  ）。
选项：
A:

Dim Preserve
B:

ReDim
C:

ReDim Preserve
D:

Dim

答案: 【解锁可见】

8、问题:下列程序的输出结果为（   ）。 

Private Sub Command1_Click()  

Dim a   

ReDim a(6)  

For j=1 To 5   

a(j)=j*j  

Next j  

Print a(a(2)*a(3)-a(4)*2)+a(5) 

End Sub 
选项：
A:

 36
B:

 16
C:

 41
D:

 25
答案: 【解锁可见】

9、问题: 执行下面程序段后，输出的结果为（  ）。    Dim a(10, 10) As Integer    For i = 2 To 4        For j = 4 To 5            a(i, j) = i * j        Next j    Next i    Print a(2, 5) + a(3, 4) + a(4, 5)
选项：
A:

 32
B:

 42
C:

 52
D:

 22
答案: 【解锁可见】

10、问题:要分配存放如下方阵的数据，正确的且最节约存储空间的数组声明语句是（  ）。   

1.1  2.2   3.3 

4.4  5.5   6.6 

7.7  8.8   9.9  
选项：
A:

Dim a(-1 To 1, -5 To -3) As Single 
B:

Dim a(3, 3) As Single 
C:

Dim a(-3 to 1, -5 to 7) As Integer
D:

Dim a(9) As Single

答案: 【解锁可见】

第五章 单元测试

1、问题:假定有如下的Sub过程：Sub fun(x As Single, y As Single)    t = x    x = t / y    y = t Mod yEnd Sub在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()    Dim a As Single    Dim b As Single    a = 6    b = 4    fun a, b    Print a, bEnd Sub程序运行后，单击命令按钮，输出结果为（   ）。
选项：
A:

1  1
B:

5  4
C:

1.5  2
D:

1.25  4
答案: 【解锁可见】

2、问题:假定有以下函数过程：Function Fun(s As String) As String    Dim s1 As String    For i = 1 To Len(s)        s1 = UCase(Mid(s, i, 1)) + s1    Next i    Fun = s1End Function在窗体上添加一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()    Dim Str1 As String    Dim Str2 As String    Str1 = InputBox(“请输入一个字符串”)    Str2 = Fun(Str1)    Print Str2End Sub程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后再窗体上输出的结果为（   ）。
选项：
A:

GFEDCBA
B:

gfedcba
C:

ABCDEFG
D:

Abcdefg
答案: 【解锁可见】

3、问题:有如下函数过程：Function secproc(x As Integer, y As Integer, z As Integer)    secproc = 3 * y + z + 2 * xEnd Function Private Sub Command1_Click()    Dim a As Integer, b As Integer, c As Integer    a = 2: b = 3: c = 4    Print secproc(c, b, a)End Sub该程序的运行结果是（   ）。
选项：
A:

20
B:

18
C:

19
D:

17
答案: 【解锁可见】

4、问题:有如下函数过程：Function Cys(ByVal x As Integer, ByVal y As Integer) As Integer    Dim quotients    Do While y <> 0        quotients = x / y        x = y        y = quotients    Loop    Cys = xEnd Function以下是调用该函数的事件过程，该程序的运行结果是（   ）。Private Sub Command1_Click()    Dim a As Integer    Dim b As Integer    a = 10    b = 2    x = Cys(a, b)    Print xEnd Sub
选项：
A:

100
B:

0
C:

5
D:

25
答案: 【解锁可见】

5、问题: 在窗体上画一个命令按钮(名称为Command1)，并编写如下代码：Function Fun1(ByVal a As Integer, b As Integer) As Integer    Dim t As Integer    t = a – b    b = t + a    Fun1 = t + bEnd Function Private Sub Command1_Click()    Dim x As Integer    x = 10    Print Fun1(Fun1(x, (Fun1(x, x – 1))), x – 1)End Sub程序运行后，单击命令按钮，输出结果是(　　)。
选项：
A:

 10
B:

 11
C:

 21
D:

 0
答案: 【解锁可见】

6、问题:下面程序的运行结果为（   ）。Dim a%, b%, c%Sub p1(x%, y%)    Dim c As Integer    x = 2 * x: y = y + 2: c = x + yEnd SubSub p2(x%, ByVal y%)    Dim c As Integer    x = 2 * x: y = y + 2: c = x + yEnd SubPrivate Sub Command1_Click()    a = 2: b = 4: c = 6    Call p1(a, b)    Call p2(a, b)    Print a; b; cEnd Sub
选项：
A:

 8  8  6
B:

 4  6  6
C:

 4  6  10
D:

 8  6  6
答案: 【解锁可见】

7、问题:下面程序：Function a(x)    Static b As Integer    b = b + x ^ 2    Print bEnd Function Private Sub Command1_Click()    Dim c%    c = a(2)End Sub单击两次命令按钮，第二次显示的结果是（   ）。
选项：
A:

 2
B:

 4
C:

 8
D:

 6
答案: 【解锁可见】

8、问题:下列叙述中正确的是（   ）。
选项：
A:

局部变量的作用域可以超出所定义的过程
B:

在调用过程时，所有局部变量被系统初始化为0或空字符串
C:

在某个Sub过程中定义的局部变量可以与其他事件过程中定义的局部变量同名，但其作用域只限于该过程
D:

在窗体的Form_Load事件中定义的变量是全局变量
答案: 【解锁可见】

9、问题:若已编写了一个Sort子过程，在该工程中有多个窗体，为了方便地调用Sort子过程，应将该过程放在  （   ）中。
选项：
A:

类模块
B:

标准模块
C:

窗体模块
D:

工程
答案: 【解锁可见】

10、问题:以下是一个能返回数组a中最大数的函数过程代码： 

Function maxval(a() As Integer) As Integer   

Dim max%   

max = 1 

For i = 2 To 10 

If a(i) > a(max) Then max = i   

Next i 

     maxval = max 

End Function 

Private Sub Command1_Click()

    Dim x(1 To 10) As Integer

    For i = 1 To 10

        x(i) = Int(Rnd() * 100)

        Print x(i);

    Next i

    Print

    Print maxval(x())

End Sub程序运行时，发现函数过程的返回值是错的需要修改，下面的修改方案中正确的是（  ）。 
选项：
A:

语句“max = 1”应改为“max = a(1)” 
B:

语句“maxval = max ”应改为“maxval  = a(max)”
C:

语句“For i = 2 To 10”应改为“For i = 1 To 10”
D:

If语句“max = i”应改为“max = a(i)”
答案: 【解锁可见】

第六章 单元测试

1、问题:若要求显示一个指定窗体,所用的方法是(  )。

选项：
A:

Hide
B:

Show
C:

Load
D:

Open
答案: 【解锁可见】

2、问题:确定一个窗体或控件大小的属性是(  )。

选项：
A:

Top和Right
B:

Width和Height
C:

Width和Top
D:

Top和Left
答案: 【解锁可见】

3、问题:当一个工程含有多个窗体时,其中的启动窗体是(  )。

选项：
A:

启动 Visual Basic时建立的窗体
B:

在“工程属性”对话框中指定的窗体

C:

第一个添加的窗体
D:

最后一个添加的窗体

答案: 【解锁可见】

4、问题:每建立一个窗体,工程管理器窗口中就会增加一个(  )。

选项：
A:

窗体文件

B:

类模块文件

C:

工程文件
D:

程序模块文件

答案: 【解锁可见】

5、问题:当运行程序时,系统自动执行启动窗体的(  )事件过程。

选项：
A:

Load
B:

GotFocus

C:

Click

D:

UnLoad

答案: 【解锁可见】

6、问题: 若要改变窗体中显示文本的颜色,应该使用的属性是(  )。

选项：
A:

ForeColor
B:

BackColor
C:

Caption
D:

Font
答案: 【解锁可见】

7、问题:

在设计阶段,当双击窗体上的某个控件时,所打开的窗口是(  )。 
选项：
A:

工具箱窗口
B:

工程资源管理器窗口
C:

代码窗口
D:

属性窗口
答案: 【解锁可见】

8、问题: 如果要改变窗体的标题,需要设置窗体对象的哪一属性(  )。
选项：
A:

Caption
B:

BackColor 
C:

BorderStyle
D:

Name
答案: 【解锁可见】

9、问题: Cls方法可清除窗体或图片框中的信息是(  )。

选项：
A:

以上方法都对
B:

Picture属性设置的背景图案
C:

在设计时放置的控件
D:

程序设计时产生的图形和文字
答案: 【解锁可见】

10、问题:

窗体的Enable属性的属性值是(  )类型的数据。 
选项：
A:

 整型
B:

 字符型
C:

 实型
D:

 逻辑型
答案: 【解锁可见】

第七章 单元测试

1、问题:一般不用来触发事件的对象是(  )。

选项：
A:

文本框

B:

标签
C:

命令按钮

D:

窗体

答案: 【解锁可见】

2、问题:如果将文本框的Locked属性设置为True,则以下说法(  )是正确的。

选项：
A:

在程序代码中不可以修改文本框的内容,如：不可以使用语句Text1.Text=”aa”

B:

运行时用户不可以在界面上修改文本框中的内容

C:

此时在属性窗口不可以修改文本框的Text属性值
D:

以上均不正确

答案: 【解锁可见】

3、问题:单击命令按钮Commandl必将调用的事件(  )。


选项：
A:

Dbclick

B:

LostFocus
C:

Click

D:

KeyPress

答案: 【解锁可见】

4、问题:能够改变复选框中背景颜色的属性是(  )。

选项：
A:

FontColor

B:

Value
C:

Font

D:

BackColor

答案: 【解锁可见】

5、问题:以下不属于同类的是(  )。

选项：
A:

Name

B:

Click
C:

Top

D:

Caption

答案: 【解锁可见】

6、问题: 列表框中列表项的数目可通过(  )属性的值获得。

选项：
A:

Count
B:

ListCount
C:

Index
D:

SelCount
答案: 【解锁可见】

7、问题:

组合框控件是将(  )组合成一个控件。 
选项：
A:

列表框控件和文本框控件
B:

标签控件和列表框控件
C:

复选框控件和选项按钮控件
D:

标签控件和文本框控件
答案: 【解锁可见】

8、问题: 要在图片框P1中打印字符串”How Are You”,应使用语句(  )。

选项：
A:

P1.Picture=LoadPicture(“How Are You”)
B:

Print”How Are You”
C:

P1.Print”How Are You”
D:

Picture1.Print=”How Are You”
答案: 【解锁可见】

9、问题: 在窗体上画一个名称为Timer1的计时器控件,要求每隔0.1秒发生一次计时器事件,则以下正确的属性设置语句是(  )。

选项：
A:

Timer1.Interval=100
B:

Timer1. Enabled =0.1
C:

Timer1.Interval =0.1
D:

Timer1. Enabled=100
答案: 【解锁可见】

10、问题: 以下控件中不属于容器的是(  )。

选项：
A:

Form
B:

Image
C:

PictureBox 
D:

Frame
答案: 【解锁可见】

第八章 单元测试

1、问题:刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是（）。


选项：
A:通用对话框

B:单选按钮
C:文本框

D:图片框

答案: 【解锁可见】

2、问题:将通用对话框类型,设置为字体对话框,可修改该控件的（）属性。

选项：
A:font
B:filename

C:filter

D:action

答案: 【解锁可见】

3、问题:下列属性属于颜色对话框的是（）。


选项：
A:FontSize

B:Color

C:FileName
D:Min

答案: 【解锁可见】

4、问题:在窗体上建立通用对话框必须先将（）添加到工具箱中。

选项：
A:VBComboBox控件

B:Data控件
C:Form控件

D:CommonDialog控件

答案: 【解锁可见】

5、问题:将通用对话框CommandDialog1的类型设置成另存为对话框,可调用该控件的（）方法。


选项：
A:ShowSave

B:ShowColor

C:ShowOpen
D:ShowFont

答案: 【解锁可见】

6、问题: 下列事件过程可以将打开对话框的标题改为”刑事案件卷宗”的是（）。

选项：
A: 

Private Sub Command1_Click()

CommonDialogl.DialogTitle=”刑事案件卷宗”

    CommonDialogl.ShowOpen

  End sub
B: 

Private Sub Command1_Click()

CommonDialogl.Filter =”刑事案件卷宗”

    CommonDialogl.ShowSave

  End sub
C: 

Private Sub Command1_Click()

CommonDialogl.DialogTitle=”刑事案件卷宗”

    CommonDialogl.Show

  End sub
D: 

Private Sub Command1_Click()

CommonDialogl.DialogTitle=”刑事案件卷宗”

    CommonDialogl.ShowColor

  End sub
答案: 【解锁可见】

7、问题: 窗体上有一公共对话框Commondialog1,和一个命令按钮Command1,当单击按钮时程序的功能是（）。

Private Sub Command1_Click()

Commondialog1.ShowColor

End Sub

选项：
A:打开文件对话框
B:打开字体对话框
C:打开保存对话框
D:打开颜色对话框
答案: 【解锁可见】

8、问题:

在窗体上建立一个通用对话框，名称为 CommonDialog1，用下面的语句可以建立一个对话框，CommonDialog1.Action=2

与该语句等价的语句是（）： 
选项：
A:CommonDialog1.ShowSave   
B:CommonDialog1.ShowColor   
C:CommonDialog1.ShowFont
D:CommonDialog1.ShowOpen   
答案: 【解锁可见】

9、问题: 在窗体上画一个通用对话框，其名称为CommonDialog1，然后添加一个命令按钮，并编写如下事件过程：

Private  Sub  Command1_Click()

CommonDialog1.Filter = “all files(*.*)|*.*|text files|*.txt|bat files(*.bat)|*.bat”

CommonDialog1.filterIndex = 2

  CommonDialog1.ShowOpen

  MsgBox CommonDialog1.FileName

End  Sub  

程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是（）：
选项：
A:All Files(*.*)  
B:不确定
C:Bath Files(*.bat)
D:Text Files(*.txt)
答案: 【解锁可见】

10、问题: 以下叙述中错误的是（）。
选项：
A:在程序运行时，通用对话框控件是不可见的
B:调用通用对话框控件的ShowOpen方法，可以直接打开在该通用对话框中指定的文件 
C:在同一个程序中，用不同的方法，如 ShowOpen 或 ShowSave() 等打开的通用对话框具有不同的作用
D:调用通用对话框控件的ShowColor方法，可以打开颜色对话框
答案: 【解锁可见】

第九章 单元测试

1、问题:下列选项中不正确的是(  )。

选项：
A:每个菜单项都只有一个Click事件

B:菜单项的属性可以在属性窗口中设计

C:每个菜单项都是一个对象,所以也有属性和事件
D:菜单编辑器中,标题可不输入,而名称必须输入

答案: 【解锁可见】

2、问题:在用菜单编辑器设计菜单时,必须输入的项是(  )。


选项：
A:标题
B:名称
C:索引
D:快捷键
答案: 【解锁可见】

3、问题:假定有一个菜单项,名称为MenuItem,为了运行时使该菜单项失效(变灰),应使用的语句为(  )。

选项：
A:MenuItem.Visible=True

B:MenuItem.Visible=False

C:MenuItem.Enabled=True

D:MenuItem.Enabled=False
答案: 【解锁可见】

4、问题:一个菜单项是不是一个分隔条,由(  )属性决定。

选项：
A:Visible

B:Caption

C:Name(名称)
D:Enabled

答案: 【解锁可见】

5、问题:要使用菜单项MentOne在程序运行时失效,使用的语句是(  )。

选项：
A:MentOne.Visble=True
B:MentOne.Enabled=True

C:MentOne.Visble=False

D:MentOne.Enabled=False

答案: 【解锁可见】

6、问题: 菜单控件仅支持下面哪一事件（）。

选项：
A:KeyPress
B:Click
C:Load
D:MouseDown
答案: 【解锁可见】

7、问题: 用键盘的光标键选中某一菜单项,并按回车将触发菜单的（）的事件。

选项：
A:Click
B:KeyDown
C:KeyUp
D:KeyPress
答案: 【解锁可见】

8、问题: 设菜单中有一个菜单项为”Open”.若要为该菜单命令设置访问键,即按下ALT及字母O 时,能够执行Open命令,则在菜单编辑器中设置”Open”命令的方式是（）。

选项：
A:把Caption属性设置为&Open
B:把Name属性设置为&Open
C:把Name属性设置为O&pen
D:把Caption属性设置为O&pen
答案: 【解锁可见】

9、问题: 下列不能打开菜单编辑器的操作是（）。
选项：
A:按 Ctrl+E 健
B:按Shift+Alt+M键
C:执行“工具”菜单中的“菜单编辑器”命令
D:单击工具栏中的“菜单编辑器”按钮
答案: 【解锁可见】

10、问题:

建立弹出式菜单使用的命令是（）。 
选项：
A:CreateMenu 
B:PopupMenu
C:PopupItem
D:BuildMenu 
答案: 【解锁可见】

第十章 单元测试

1、问题:使用 Circle (1000, 1000), 650 语句在窗体上绘制一个圆，则圆的线条颜色由窗体的(     )属性决定。

选项：
A:Caption

B:DrawWidth

C:BackColor
D:ForeColor

答案: 【解锁可见】

2、问题:执行指令”Line(1200,1200)-Step(1000,500),,B”后,CurrentX=(  )。


选项：
A:1200
B:1000
C:2200
D:1700
答案: 【解锁可见】

3、问题:运行以下程序后,输出的图形是(  )。For r=0 To 150

Circle(320,240),r

For i=1 To l000

Next i Next r

选项：
A:一个固定的空心圆

B:一个固定的实心圆

C:一个半径逐渐变小的空心圆
D:一个半径逐渐变大的空心圆

答案: 【解锁可见】

4、问题:下面程序运行的输出是(  )。Private Sub Command1_Click()

Cls

Line(60,60)-(70,70),5,B

Line(50,50)-(80,80),1,B

Line(40,40)-(90,90),2,B

Line(30,30)-(100,100),3,B     Line(20,20)-(110,110),4,B End Sub

选项：
A:同心的彩色正方形
B:相交的彩色圆

C:相交的彩色正方形

D:同心的彩色圆

答案: 【解锁可见】

5、问题:以下的属性和方法中,可重定义坐标系的是(  )。

选项：
A:Drawstyle属性
B:Scale方法

C:ScaleMode属性

D:DmwWidth属性

答案: 【解锁可见】

6、问题: Line(100,100)-Step(400,400)将在窗体()画一直线。
选项：
A:(200,200)到(400,400) 
B:(100,100)到(300,300) 
C:(100,100)到(500,500)
D:(100,100)到(400,400)
答案: 【解锁可见】

7、问题: vb 中的坐标圆点位于（）。

选项：
A:容器右上角
B:容器右下角
C:容器正中央
D:容器左上角
答案: 【解锁可见】

8、问题: 可用来改变坐标度量单位的是（）。

选项：
A:DrawWidth属性 
B:ScaleMode属性
C:Scale方法 
D:Drawstyle属性
答案: 【解锁可见】

9、问题: 在VB的图形方法中,要绘制矩形,需要使用（）。

选项：
A:Point方法
B:Line方法
C:Circle方法
D:Pset方法
答案: 【解锁可见】

10、问题: 如果在图片框上使用绘图方法绘制一个实心圆,则图片框的（）属性决定了该圆填充的颜色。
选项：
A:BackColor
B:DrawStyle
C:FillColor
D:ForeColor
答案: 【解锁可见】

第十一章 单元测试

1、问题:当用户按键时，KeyPress、KeyDown、KeyUp事件的执行顺序为(  )。

选项：
A:KeyDown事件、KeyPress事件、KeyUp事件

B:D．KeyDown事件、KeyUp事件与KeyPress事件
C:KeyPress事件、KeyDown事件、KeyUp事件
D:KeyDown事件、KeyUp事件、KeyPress事件
答案: 【解锁可见】

2、问题:文本框Textl的KeyDown事件过程中参数KeyCode值表示(  )。


选项：
A:所按的键盘键的键码

B:按下的是哪个数字键

C:是否按下了Alt键或Ctrl键
D:按下的是哪个鼠标键

答案: 【解锁可见】

3、问题:编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub一般情况下(即不按住Shift和锁定大写)运行程序，如按“A”键则输出(  )。

选项：
A:A a
B:a A

C:a a

D:A A

答案: 【解锁可见】

4、问题:在窗体上画一个命令按钮和一个文本框，并把窗体的KeyPreview设置为True（在激活对象上的控件键盘事件之前，优先激活键盘事件,即Form优先）然后编写如下代码：Dim SaveAll As StringPrivate Sub Command1_Click()Text1.Text=Ucase(SaveAll)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)SaveAll= SaveAll+Chr(KeyAscii)End Sub程序运行后，在键盘上输入“abcdefg”,单击命令按钮，则文本框显示为(  )。


选项：
A:ABCDEFG

B:出错

C:不显示任何信息

D:abcdefg
答案: 【解锁可见】

5、问题:在上题中，如果把窗体的KeyPreview设置为False，则文本框中显示的内容为(  )。


选项：
A:ABCDEFG

B:不显示任何信息

C:abcdefg
D:出错

答案: 【解锁可见】

6、问题: 下列关于MouseMove事件，描述正确的是()。
选项：
A:与鼠标的灵敏度有关
B:伴随鼠标的移动而连续不断的发生
C:当鼠标移动时被激活一次然后等待下次移动
D:每秒激发一次
答案: 【解锁可见】

7、问题: 当鼠标左键按下时，下列哪个事件被激发()。
选项：
A:KeyPress事件
B:MousePress事件
C:MouseDown事件
D:KeyDown事件
答案: 【解锁可见】

8、问题: 在鼠标事件中，语句If Button=2 成立的条件是()。
选项：
A:单击鼠标左键
B:双击鼠标左键
C:按键盘数字键2
D:单击鼠标右键
答案: 【解锁可见】

9、问题:Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Shift = 6 And Button = 2 Then   Print “BBBB”End IfEnd Sub程序运行后，为在窗体上输出“BBBB”，应执行操作为()。 
选项：
A:同时按下Shift和鼠标右键
B:同时按下Shift和鼠标左键
C:同时按下Ctrl、Alt和鼠标右键
D:同时按下Ctrl、Alt和鼠标左键
答案: 【解锁可见】

10、问题: 编写如下事件过程：Private Sub Form_Keydown(KeyCode As Integer, Shift As Integer)If (Button And 3) = 3 Then   Print “AAAA”End IfEnd Sub程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键为()。

选项：
A: 左
B: 右
C: 同时左，右
D: 按什么键都不显示
答案: 【解锁可见】

第十二章 单元测试

1、问题:按文件中数据的编码方式，文件分为(  )。

选项：
A:源程序文件和可执行文件

B:程序文件和数据文件

C:顺序文件和随机文件
D:ASCII码文件和二进制文件

答案: 【解锁可见】

2、问题:关于顺序文件的描述，下面正确的是(  )。

选项：
A:数据以ASCII码形式存放在文件中，所以可通过文本编辑软件显示

B:可通过编程对文件中的某条记录方便地修改

C:每条记录的长度必须相同
D:文件的组织结构复杂

答案: 【解锁可见】

3、问题:文件号最大可取的值为(  )。


选项：
A:511
B:512
C:255
D:256
答案: 【解锁可见】

4、问题:下面哪个函数可测试文件指针是否到文件尾(  )。

选项：
A:LOF
B:LOC

C:BOF

D:EOF

答案: 【解锁可见】

5、问题:下面哪个函数可得到文件的长度(  )。

选项：
A:BOF

B:LOC
C:EOF

D:LOF
答案: 【解锁可见】

6、问题: 对语句Open“c:Test.txt”For Output As #2,以下错误叙述是()。
选项：
A:通过该语句打开文件后，可以对文件进行读操作
B:执行该语句后，就可以通过Print语句向文件Test.txt中写入信息
C:若C盘根目录下不存在Test.txt，则建立一个名为Test.txt的文件 
D:若C盘根目录下存在Test.txt，则打开名为Test.txt的文件
答案: 【解锁可见】

7、问题: Print #1,STR$中的Print是()。
选项：
A:文件的读语句
B:子程序名
C:文件的写语句
D:在窗体上显示的方法
答案: 【解锁可见】

8、问题: 在随机文件操作中，定义记录类型的语句()。
选项：
A:Type…End Type
B:Dim
C:Private
D:Public
答案: 【解锁可见】

9、问题:在二进制文件操作中，读数据使用的语句()。
选项：
A:Write
B:Put
C:Input
D:Get
答案: 【解锁可见】

10、问题: 要获得当前驱动器，应使用驱动器列表框的属性为()。
选项：
A:Change
B:Path 
C:Drive 
D:FilePath
答案: 【解锁可见】