国家二级VB机试（键盘与鼠标事件过程）模拟试卷5
(总分52,考试时间90分钟)
1. 选择题
1. 以下关于键盘事件的叙述中，错误的是
A. 按下键盘按键既能触发KeyPress事件，也能触发KeyDown事件
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事件过程
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事件
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”，并单击命令按钮，则文本框中显示的是
mousemove是什么键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关于上述过程，以下叙述中正确的是
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论