[计算机类试卷]国家二级VB机试(多重窗体与环境应用、键盘与鼠标事件过程)模拟试卷1及答案与解析.doc
《[计算机类试卷]国家二级VB机试(多重窗体与环境应用、键盘与鼠标事件过程)模拟试卷1及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级VB机试(多重窗体与环境应用、键盘与鼠标事件过程)模拟试卷1及答案与解析.doc(22页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级 VB机试(多重窗体与环境应用、键盘与鼠标事件过程)模拟试卷 1及答案与解析 一、选择题 1 设工程文件包含两个窗体文件 Form1 frm、 Form2 frm及一个标准模块文件Modulel bas。两个窗体上分别只有一个名称为 Command1的命令按钮。 Form1的代码如下: Form2的代码如下: Public x As Integer Private Sub Command1_Click() Private Sub Form_Load() Print Form1 x, y x=1: y=5 End Sub End Sub Modulel的代码如下: Private Sub
2、 Command1_Click() Public y As Integer Form2 Show End Sub 运行以上程序,单击 Form1的命令按钮 Command1,则显示 Form2;再单击Form2上的命令按钮 Command1,则窗体上显示的是 ( A) 1 5 ( B) 0 5 ( C) 0 0 ( D)程序有错 2 以下叙述中错误的是 ( A) Sub Main是定义在标准模块中的特定过程 ( B)一个工程中只能有一个 Sub Main过程 ( C) Sub Main过程不能有返回值 ( D)当工程中含有 Sub Main过程时,工程执行时一定最先执行该过程 3 Visual
3、 Basic中的 “启动对象 ”是指启动 Visual Basic应用程序时,被自动加载并首先执行 的对象。下列关于 Visual Basic“启动对象 ”的描述中,错误的是 ( A) “启动对象 ”可以是指定的标准模块 ( B) “启动对象 ”可以是指定的窗体 ( C) “启动对象 ”可以是 Sub Main过程 ( D)若没有经过设置,则默认的 “启动对象 ”是第一个被创建的窗体 4 以下关于 VB文件的叙述中,正确的是 ( A)标准模块文件的扩展名是 frm ( B) VB应用程序可以被编译为 exe文件 ( C)一个工程文件只能含有一个标准模块文件 ( D)类模块文件的扩展名为 bas
4、 5 如果把程序的启动对象设置 为: Sub Main,则 Sub Main过程 ( A)只能写在 Form1窗体中代码的最前面 ( B)可以写在 Form1窗体中代码的任何位置 ( C)只能写在某个标准模块的代码中 ( D)可以写在任何窗体或标准模块的代码中 6 以下叙述中,错误的是 ( A)标准模块不属于任何一个窗体 ( B)工程文件的扩展名为 vbg ( C)窗体文件的扩展名为 frm ( D)一个应用程序可以有多个窗体 7 以下关于键盘事件的叙述中,错误的是 ( A)按下键盘按键既能触发 KeyPress事件,也能触发 KeyDown事件 ( B) KeyDown、 KevUP事件过程
5、中,大、小写字母被视作相同的字符 ( C) KeyDown、 KeyUp事件能够识别 Shift、 Alt、 Ctrl等键 ( D) KeyCode是 KeyPress事件的参数 8 以下可以判断是否在文本框 (名称为 Text1)内按下了回车键的事件过程是 ( A) Text1_Change ( B) Text1_Click ( C) Text1_KeyPress ( D) Text1_GotFocus 9 以下说法中正确的是 ( A)当焦点在某个控件上时,按下一个字母键,就 会执行该控件的 KeyPress事件过程 ( B)因为窗体不接受焦点,所以窗体不存在自己的 KeyPress事件过程
6、 ( C)若按下的键相同, KeyPress事件过程中的 KeyAscii参数与 KeyDown事件过程中的 KeyCode参数的值也相同 ( D)在 KeyPress事件过程中, KeyAscii参数可以省略 10 向文本框中输入字符时,下面能够被触发的事件是 ( A) GotFocus ( B) KeyPress ( C) Click ( D) MouseDown 11 关于 KeyPress事件,以下叙述 中正确的是 ( A)在控件数组的控件上按键盘键,不能触发 KeyPress事件 ( B)按下键盘上任一个键时,都能触发 KeyPress事件 ( C)按字母键时,拥有焦点的控件的 Ke
7、yPress事件会被触发 ( D)窗体没有 KeyPress事件 12 下列事件的事件过程中,参数是输入字符 ASCII码的是 ( A) KeyDown事件 ( B) KeyUp事件 ( C) KeyPress事件 ( D) Change事件 13 文本框 Text1的 KeyDown事件过程如下: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)End Sub 其中参数 KeyCode的值表示的是发生此事件时 ( A)是否按下了 Alt键或 Ctrl键 ( B)按下的是哪个数字键 ( C)所按的键盘键的键码 ( D
8、)按下的是哪个鼠标键 14 VB中有 3个键盘事件: KeyPress、 KeyDown、 KeyUp,若光标在 Text1文本框中,则每输入一个字母 ( A)这 3个事件都会触发 ( B)只触发 KeyPress事件 ( C)只触发 KeyDown、 KeyUp事件 ( D) 不触发其中任何一个事件 15 在窗体上画一个命令按钮和一个文本框 (名称分别为 Command1和 Text1),并把窗体的 KeyPreview属性设置为 True,然后编写如下代码: Dim SaveAll As String Private Sub Form_KeyPress(KeyAscii_ Private
9、Sub Form_Load() As Integer) Text1 Text=“: Text1 SetFocus SaveAll=SaveAll+Chr(KeyAscii) End Sub End Sub Private Sub Command1_Click() Text1: Text=LCase(SaveAtl)+SaveAlt End Sub 程序运行后,直接用键盘输入: VB,再单击命令按钮,则文本框中显示的内容为 ( A) vbVB ( B)不显示任何信息 ( C) VB ( D)出错 16 窗体上有一个 Text1文本框,并编写了下面事件过程: Private Sub Text1_K
10、eyPress(KeyAscii As Integer) KeyAscii=KeyAscii+3 End Sub 程序运行时,在文本框中输入字符 “A”,则在文本框中实际显示的是 ( A) A ( B) B ( C) C ( D) D 17 对于文本框 Text1,能够获得按键的 ASCII码值的事件过程是 ( A) Text1_KeyUp ( B) Text1_KeyPress ( C) Text1_Click ( D) Text1_Change 18 将窗体的 KeyPreview属性设为 True,然后编写如下程序: Private Sub Form_KeyDown(KeyCode_ P
11、rivate Sub Form_KeyPress(KeyAscii As Integer, Shift As Integer) As Integer) Print Chr(KeyCode) Print Chr(KeyAsci i) End Sub End Sub 运行程序时,按下字母键 a,则窗体上显示的是 ( A) A A ( B) A a ( C) a A ( D) a a 19 在窗体上画 1名为 Command1的命令按钮和 1名 Text1的文本框,再编写如下程序: Dim ss As String Private Sub Command1_Click() Private Sub T
12、ext1_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) Next End Sub Text1 Text=UCase(m) End Sub 程序运行后,在文本框中输入 “Number 100”,并单击命令按钮,则文本框中显示的是 ( A) NUMBER 100 ( B) REBMUN ( C) REBMUN 100 ( D) 001 REBMUN 20
13、窗体上有 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 21 设窗体上有 2个文本框 Text1和 Text2,并有下面的事件过程: Dim n Private Sub Text1_KeyPress(KeyAscii As Integer) If“A“=Chr(
14、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 22 若看到程序中有以下事件过程,则可以肯定的是,当程序运行时 Private Sub Click_MouseDown(Button As Integer, _Shift As Integer, X As Single,Y As Single
15、) Print“VB Program“ End Sub ( A)用鼠标左键单击名称为 “Command1”的命令按钮时,执行此过程 ( B)用鼠标左键单击名称为 “MouseDown”的命令按钮时,执行此过程 ( C)用鼠标右键单击名称为 “MouseDown”的控件时,执行此过程 ( D)用鼠标左键或右键单击名称为 “Click”的控件时,执行此过程 23 设有窗体的 Form MouseMove事件过程如下: Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single,Y As Single) If
16、(ButtonAnd 3)=3 Then Print“检查按键 “ End If End Sub 关于上述过程,以下叙述中正确的是 ( A)按下鼠标左键时,在窗体上显示 “检查按键 ” ( B)按下鼠标 右键时,在窗体上显示 “检查按键 ” ( C)同时按下鼠标左、右键时,在窗体上显示 “检查按键 ” ( D)不论做何种操作,窗体上都不会显示 24 要求当鼠标在图片框 P1中移动时,立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是 ( A) Private Sub P 1一 MouseMove(Button As Integer, Shift As Integer, X A
17、s 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(Button As Imeger, Shift As Integer, X As Single,Y As Single) P1 Print X, Y End Sub ( D) Private Sub Form_Mou
18、seMove(Button As Integer, Shift As Integer, X As Single, Y As Single) P1 Print X, Y End Sub 25 窗体的 MouseUp事件过程如下: Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) End Sub 关于以上定义,以下叙述中错误的是 ( A)根据 Shift参数,能够 确定使用转换键的情况 ( B)根据 X、 Y参数可以确定触发此事件时鼠标的位置 ( C) Button参数的值
19、是在 MouseUp事件发生时,系统自动产生的 ( D) MouseUp是鼠标向上移动时触发的事件 26 命令按钮 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参数用于确定按下的鼠标键 ( C) Shift参数用于确定是否按下了 Alt、 Ctrl或 Shift键 ( D)
20、MouseUp表示抬起鼠标按键时触发的事件 27 有下面事件过程: Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single,Y As Single) If Button=2 Then Form1 PSet(X, Y)PSet方法可以在 X, Y处画一个点 End If End Sub 程序运行后,产生的效果是 ( A)在窗体上每单击鼠标左键一次,就在鼠标位置处画一个点 ( B)按着鼠标左键,移动鼠标,可在窗体上画出鼠标的运动轨迹 ( C)按着鼠标右键,移动鼠标,可在窗体上画出鼠标的运动轨迹 ( D)
21、不按任何鼠标键,移动鼠标,可在窗体上画出鼠标的运动轨迹 28 窗体上已有 1个名称为 Picturel的图片框,要求实现下面 2个功能之一: (1)在窗体上移动鼠标时,立即将 Picturel显示在鼠标位置 (2)在窗体上单击鼠标时,立即将 Picturel显示在鼠标位置下面不能实现上述任何功能的事件过程是 ( A) Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Picturel Move X, Y End Sub ( B) Private Sub Form_M
22、ouseUp(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) Picture 1 CurrentX=X: Picture 1 CurrentY=Y End Sub ( D) Private Sub Form MouseMove(Button As Integer, Shift A
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 机试 多重 窗体 环境 应用 键盘 鼠标 事件 过程 模拟 答案 解析 DOC

链接地址:http://www.mydoc123.com/p-499958.html