国家二级VB机试（键盘与鼠标事件过程）模拟试卷5
(总分52,考试时间90分钟)
1. 选择题
1. 以下关于键盘事件的叙述中，错误的是
A. 按下键盘按键既能触发KeyPress事件，也能触发KeyDown事件test什么意思
B. KeyDown、KeyUp事件过程中，大、小写字母被视作相同的字符
C. KeyDown、KeyUp事件能够识别Shift、Alt、Ctrl等键
D. KeyCode是KevPress事件的参数
2. 以下可以判断是否在文本框(名称为Text1)内按下了回车键的事件过程是
A. Text1_Change        B. Text1_Click
C. Text1_KeyPress        D. Text1_GotFocus
3. 以下说法中正确的是
A. 当焦点在某个控件上时，按下一个字母键，就会执行该控件的KeyPress事件过程
B. 因为窗体不接受焦点，所以窗体不存在自己的KeyPress事件过程
二级VB
C. 若按下的键相同，KeyPress事件过程中的KeyAscii参数与KeyDown事件过程中的KeyCode参数的值也相同
D. 在KeyPress事件过程中，KeyAscii参数可以省略
4. 向文本框中输入字符时，下面能够被触发的事件是
A. GotFocus        B. KeyPress
C. Click        D. MouseDown
5. 关于KeyPress事件，以下叙述中正确的是
A. 在控件数组的控件上按键盘键，不能触发KeyPress事件
B. 按下键盘上任一个键时，都能触发KeyPress事件
C. 按字母键时，拥有焦点的控件的KeyPress事件会被触发
D. 窗体没有KeyPress事件
cvt无级变速6. 下列事件的事件过程中，参数是输入字符ASCII码的是
A. KeyDown事件        B. KeyUp事件
C. KeyPress事件        D. Change事件
7. 文本框Text1的KeyDown事件过程如下：Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)…End Sub其中参数KeyCode的值表示的是发生此事件时英文自我介绍 面试
A. 是否按下了Alt键或Ctrl键        B. 按下的是哪个数字键
C. 所按的键盘键的键码        D. 按下的是哪个鼠标键
8. VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Text1文本框中，则每
输入一个字母
A. 这3个事件都会触发        B. 只触发KeyPress事件
C. 只触发KeyPress、 KeyUp事件        D. 不触发其中任何一个事件
9. 在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text)，并把窗体的KevPreview属性设置为True，然后编写如下代码：Dim SaveAll As String              Private Sub Form_KeyPress(KeyAscii_Private SUb Form_Load()                                As Integer)Text1．Text=""：Text1．SetFocus    SaveAll=SaveAll+Chr(KeyAscii)End SUb                            End SubPrivate Sub Commandl_Click() Text1．Text=LCase(SaveAll)+SavAllEnd Sub程序运行后，直接用键盘输入：VB，再单击命令按钮，则文本框中显示的内容为
A. vbVB        B. 不显示任何信息
C. VB        D. 出错
10. 窗体上有一个Text1文本框，并编写了下面事件过程：Private SUb Text1_KeyPress(KeyAscii As Integer)  KeyAscii=KeyAscii+3End SUb程序运行时，在文本框中输入字符“A”，则在文本框中实际显示的是
A. A        B. B
C. C        D. D
11. 对于文本框Text1，能够获得按键的ASCII码值的事件过程是
A. Text1 KeyUp        B. Text1 KeyPress
C. Text1 Click        D. Text1 Change
12. 将窗体的KeyPreview属性设为True，然后编写如下程序：Private SUb Form_KeyDown(KeyCode_        Private SUb Form_KeyPress(KeyAscii    As Integer,Shift As Integer)                                As Integer)    Print Chr(KeyCode)                          Print Chr(KeyAscii)End Sub                                    End Sub运行程序时，按下字母键a，则窗体上显示的是
A. A A        B. A a
C. a A        D. a a
13. 在窗体上画1名为Command1的命令按钮和1名Text1的文本框，再编写如下程序：Dim ss As String                            Private Sub Commandl_Click()Private Sub Text1_KeyPress(KeyAscii_            Dim m As String，i As Integer  As Integer)                                  For i=Len(ss)To 1 Step-1  If Chr(KeyAscii)＜＞""Then                        m=m+Mid(ss，i，1)  ss=ss+Chr(KeyAscii)                            NextEnd Sub                                        Text 1．Text=UCase(m)                                            End Sub程序运行后，在文本框中输入“Number 100”，并单击命令按钮，则文本框中显示的是
A. NUMBER 100        B. REBMUN
C. REBMUN 100        D. 001 REBMUN
名画14. 窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程：Private Sub Text1_KeyUp(KeyCode As Integer，Shift As Integer)    Print Text1．Text；End Sub运行
程序，并在文本框中输入“123 ”，则在窗体上的输出结果为感恩公司最朴实的句子
A. 123        B. 112
C. 12123        D. 112123
15. 设窗体上有2个文本框Text1和Text2，并有下面的事件过程：Dim nPrivate Sub Text1_KeyPress(KeyAscii As Integer)  If"A"＜=Chr(KeyAscii)And Chr(KeyAscii)＜="Z"Then    n=n+1  End If  If KeyAscii：1 3 Then Text2．Text=nEnd Sub程序运行时，在文本框Textl中输入“Visual Basic 6．0”并按回车键后，在文本框Text2中显不的是
A. 2        B. 9
C. 13        D. 16
16. 若看到程序中有以下事件过程，则可以肯定的是，当程序运行时Private Sub Click_MouseDown(Button As Integer,_Shift As Integer,X As Single，Y As Single)  Print"VB Program"End Sub
A. 用鼠标左键单击名称为“Commandl”的命令按钮时，执行此过程
B. 用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程
C. 用鼠标右键单击名称为“MouseDown”的控件时，执行此过程
D. 用鼠标左键或右键单击名称为“Click”的控件时，执行此过程
17. 设有窗体的Form MouseMove事件过程如下：Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single) If(Button And 3)=3 Then  Print"检查按键" End If  End Sub关于上述过程，以下叙述中正确的是