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