[计算机类试卷]国家二级VB机试(键盘与鼠标事件过程)模拟试卷2及答案与解析.doc
《[计算机类试卷]国家二级VB机试(键盘与鼠标事件过程)模拟试卷2及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级VB机试(键盘与鼠标事件过程)模拟试卷2及答案与解析.doc(18页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级 VB机试(键盘与鼠标事件过程)模拟试卷 2及答案与解析 一、选择题 1 以下说法中正确的是 ( )。 ( A)当焦点在某个控件上时,按下一个字母键,就会执行该控件的 KeyPress事件过程 ( B)因为窗体不接受焦点,所以窗体不存在自己的 KeyPress事件过程 ( C)若按下的键相同, KeyPress事件过程中的 KeyAseii参数与 KeyDown事件过程中的 KeyCode参数的僵也相同 ( D)在 KeyPress事件过程中, KeyAscii参数可以省略 2 关于 KeyPress事件, 以下叙述中正确的是 ( )。 ( A)在控件数组的控件上按键盘键,不能触发 K
2、eyPress事件 ( B)按下键盘上任一个键时,都能触发 KeyPress事件 ( C)按字母键时,拥有焦点的控件的 KeyPress事件会被触发 ( D)窗体没有 KeyPress事件 3 在窗体上画一个命令按钮和一个文本框 (名称分别为 Command1和 Text1),并把窗体的 KeyPreview属性设置为 True,然后编写如下代码: Dim SaveAll As String Private Sub Form_Load() Show Text1 Text=“ Text1 SetFocus End Sub Private Sub C ammand1_Click() Text1 T
3、ext=LCase(SaveAll)+SaveAll End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后,直接用键盘输入 VB,再单击命令按钮,则文本框中显示的内容为( )。 ( A) vbVB ( B)不显示任何信息 ( C) VB ( D)出错 4 以下关于键盘事件的叙述中,错误的是 ( )。 ( A)按下键盘按键既能触发 KeyPress事件,也能触发 KeyDown事件 ( B) KeyDown、 KeyUp事件过程中,大、小写字母被视作相同
4、的字符 ( C) KeyDown、 KeyUp事件能够识别 Shift、 Ah、 Ctrl等键 ( D) KeyCode是 KeyPress事件的参数 5 下面不是键盘事件的是 ( )。 ( A) KeyDown ( B) KeyUp ( C) KeyPress ( D) KeyCode 6 设窗体上有 2个文本框 Textl和 Text2,并有下面的事件过程: Dim n Private Sub Text1_KeyPress(KeyAscii As Integer) If“A“ =Chr(KeyAscii)And Chr(KeyAscii) =“Z“Then n=n+1 End If If
5、KeyAscii=13 Then Text2 Text=n End If End Sub 程序运行时,在文本框 Textl中输入 “Visual Basic 6 0”并按 Enter键后,在文本框Text2中显示的是 ( )。 ( A) 2 ( B) 9 ( C) 13 ( D) 16 7 窗体上有一个 Text1文本框,并编写了下面事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) KeyAscii=KeyAscii+3 End Sub 程序运行时,在文本框中输入字符 “A”,则在文本框中实际显示的是 ( )。 ( A) A ( B)
6、B ( C) C ( D) D 8 下列事件的事件过程中,参数是输入字符 ASCII码的是 ( )。 ( A) KeyDown事件 ( B) KeyUp事件 ( C) KeyPress事件 ( D) Change事件 9 对于文本框 Text1,能够获得按键的 ASCII码值的事件过程是 ( )。 ( A) Text1_KeyUp ( B) Text1_KeyPress ( C) Text1_Click ( D) Text1_Change 10 将窗体的 KeyPreview属性设为 True,然后编写如下程序: Private Sub Form_KeyDown(KeyCode As Inte
7、ger, Shift As Integer) Print Chr(KeyCode) End Sub Privme Sub Form_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 运行程序时,按下字母键 a,则窗体上显示的是 ( )。 ( A) A A ( B) A a ( C) a A ( D) a a 11 以下可以判断是否在文本框 (名称为 Text1)内按下了回车键的事件过程是 ( )。 ( A) Text1_Change ( B) Text1_Click ( C) Text1_KeyPress ( D) Text1_
8、GotFocus 12 下面叙述中错误的是 ( )。 ( A)由于窗体不能获得焦点,所以窗体没有键盘事件 ( B) 框架控件没有键盘事件 ( C)标签控件没有键盘事件 ( D)文本框有键盘事件,但当 Enabled属性被设置为 False时,其键盘事件无法被激活 13 文本框 Text1的 KeyDown事件过程如下: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) End Sub 其中参数 KeyCode的值表示的是发生此事件时 ( )。 ( A)是否按下了 Alt键或 Ctrl键 ( B)按下的是哪个数字键 (
9、 C) 所按的键盘键的键码 ( D)按下的是哪个鼠标键 14 窗体上有两个名称分别为 Text1、 Text2的文本框。 Text1的 KeyUp事件过程如下: Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Dim c As String c=UCase(Chr(KeyCode) Text2 Text=Chr(Asc(c)+2) End Sub 当向文本框 Text1中输入小写字母 a时,文本框 Text2中 显示的是 ( )。 ( A) A ( B) a ( C) C ( D) c 15 VB中有 3个键盘事件:
10、KeyPress、 KeyDown和 KeyUp,若光标在 Text1文本框中,则每输入一个字母 ( ( A)这 3个事件都会触发 ( B)只触发 KeyPress事件 ( C)只触发 KeyDown、 KeyUp事件 ( D)不触发其中任何一个事件 16 窗体上有 1个名称为 Text1、内容为空的文本框。编写如下事件过程: Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Print Text1 Text; End Sub 运行程序,并在文本框中输入 “123”,则在窗体上的输出结果为 ( )。 ( A) 123 (
11、 B) 112 ( C) 12123 ( D) 112123 17 编写如下程序: Private Sub Form Click() Print“Welcome!“ End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single,Y As Single) Print“欢迎 !“ End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) Print“热烈欢迎 !
12、“ End Sub 程序运行后,单击窗体,输出结果为 ( )。 ( A)欢迎 ! 热烈欢迎 ! Welcome! ( B)欢迎 ! Welcome! 热烈欢迎 ! ( C) Welcome! 欢迎 ! 热烈欢迎 ! ( D) Welcome! 热烈欢迎 ! 欢迎 ! 18 若看到程序中有以下事件过程,则可以肯定的是,当程序运行时 ( )。 Private Sub Chck_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Print”VB Program” End Sub ( A)用鼠标左键单击名称
13、为 “Command1”的命令按钮时,执行此过程 ( B)用 鼠标左键单击名称为 “MouseDown”的命令按钮时,执行此过程 ( C)用鼠标右键单击名称为 “MouseDown”的控件时,执行此过程 ( D)用鼠标左键或右键单击名称为 “Click”的控件时,执行此过程 19 窗体的 MouseUp事件过程如下: Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) End Sub 关于以上定义,以下叙述中错误的是 ( )。 ( A)根据 Shift参数,能够确定使用转
14、换键的情况 ( B)根据 X、 Y参数可以确定触发此事件时鼠标的位置 ( C) Button参数的值是在 MouseUp事件发生时,系统自动产生的 ( D) MouseUp是鼠标向上移动时触发的事件 20 命令按钮 Command1的 MouseUp事件过程结构如下: Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) End Sub 则 以下叙述中错误的是 ( )。 ( A) X、 Y参数表示的是 Command1左上角在窗体中的位置 ( B) Button参数
15、用于确定按下的鼠标键 ( C) Shift参数用于确定是否按下了 Ah、 Ctrl或 Shift键 ( D) MouseUp表示抬起鼠标按键时触发的事件 21 要求当鼠标在图片框 P1中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是 ( )。 ( A) Private Sub P1_MouseMove(Button As Integer, Shift As Integer, X As Single,Y As Single) Print X, Y End Sub ( B) Private Sub P1_MouseDown(Button As Integer, Shi
16、ft As Integer, X As Single, Y AsSingle) Picture Print X Y End Sub ( C) Private Sub P1_MouseMove(Button As Integer, Shift As Integer, X As SinOe,Y As Single) P1 Print X, Y End Sub ( D) Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) P1 Print X, Y End Sub 22 设
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 关于上述过程,以下叙述中正确的是 ( )。 ( A)按下鼠标左键时,在窗体上显示 “检查按键 ” ( B)按下鼠标右键时,在窗体上显示 “检查按键 ” ( C)同时按下鼠标左、右键时,在窗体上显示 “检查按键 ” ( D)不论做何种操作,窗体上都不会显示 23
18、要求在程序运行时,如果按住鼠标左键不放而移动鼠标,鼠标的位置坐标同步显示在窗体右上角 的标签 (名称为 Label1)中,如右图所示,放开鼠标左键后,停止同步显示。 下面可以实现此功能的程序是 ( )。 ( A) Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button=1, Then Label1=“X=“&X&“ Y=“&Y End If End Sub ( B) Private Sub Form_MouseUp(Button As Integer,
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 机试 键盘 鼠标 事件 过程 模拟 答案 解析 DOC
