[计算机类试卷]国家二级VB机试(多重窗体与环境应用)模拟试卷1及答案与解析.doc
《[计算机类试卷]国家二级VB机试(多重窗体与环境应用)模拟试卷1及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级VB机试(多重窗体与环境应用)模拟试卷1及答案与解析.doc(25页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级 VB机试(多重窗体与环境应用)模拟试卷 1及答案与解析 一、选择题 1 以下关于多重窗体程序的叙述中,错误的是 ( A)对于多重窗体程序,需要单独保存每个窗体 ( B)在多重窗体程序中,可以根据需要指定启动窗体 ( C)在多重窗体程序中,各窗体的菜单是彼此独立的 ( D)用 Hide方法不仅可以隐藏窗体,而且还可以清除内存中的窗体 2 下列操作中不能向工程添加窗体的是 ( A)执行 “工程 ”菜单中的 “添加窗体 ”命令 ( B)单击工具栏上的 “添加窗体 ”按钮 ( C)右击窗体,在弹出的菜单中选择 “添 加窗体 ”命令 ( D)右击工程资源管理器,在弹出的菜单中选择 “添加 ”命
2、令,然后在下一级菜单中选择 “添加窗体 ”命令 3 对于含有多个窗体的工程而言,以下叙述中正确的是 ( A)没有指定启动窗体时,系统自动将最后一个添加的窗体设置为启动窗体 ( B)启动窗体可以通过 “工程属性 ”对话框指定 ( C) Load方法兼有装入和显示窗体两种功能 ( D) Hide方法可以将指定的窗体从内存中清除 4 设工程中有 Form1、 Form2两个窗体,要求单击 Form2上的 Command1命令按钮, Form2就可以从屏幕上 消失,下面的事件过程中不能实现此功能的是 ( A) Private Sub Commandl_Click()Form2 Hide End Sub
3、 ( B) Private Sub Commandl_Click()Unload Me End Sub ( C) Private Sub Commandl_Click()Form2 Unload End Sub ( D) Private Sub Commandl_Click()Me Hide End Sub 5 工程中有 Form1、 Form2两个窗体 (Form1中有文 本框 Text1; Form2中有 Text1文本框和 Command1命令按钮 )。 Form1是启动窗体。在这些模块中编写下面的程序代码: Form1中的代码如下: Private Sub Text1_DblClick
4、() Text1=”VisualBasic” Form2 Show End Sub Form2中的代码如下: Private Sub Commandl_Click() Text1=Form1 Text1 Form1 Show End Sub 下面关于程序的叙述中错误的是 ( A)双击 Form1的 Text1后, Textl中显示 “VisualBasic”弹出 Form2 ( B)双击 Form1的 Text1后, Form2成为当前窗体 ( C)单击 Form2的命令按钮, Form1成为当前窗体 ( D) Form2的 Text1=Form1 Text1语句不能正确执行 6 设工程中有
5、2个窗体: Forml和 Form2,每个窗体上都有一个名称为 Text1的文本框。若希望把 Form1上文本框中的内容复制到 Form2上的文本框中,应进行的操作是 ( A)执行 Form1中的语句: Form1 Text1=Form2 Text1 ( B)执行 Form1中的语句: Text1=Form1 Text ( C)执行 Form2中的语句: Form1 Text1=Text1 ( D)执行 Form2中的语句: Text1=Form1,Text1 7 设工程文件包含两个窗体文件 Form1 frm、 Form2 frm及一个标准模块文件Modulel bas。两个窗体上分别只有一
6、个名称为 Command1的命令按钮。 Forml的代码如下: Public X As Integer Private Sub Form Load() x=1: y=5 End Sub Private Sub Commandl_Click() Form2 Show End Sub Form2的代码如下: Private Sub Commandl_Click() Print Forml x y End Sub Modulel的代码如下: Public y As Integer 运行以上程序,单击 Forml的命令按钮 Commandl,则显示 Form2;再单击 Form2上的命令按钮 Comm
7、andl,则窗体上显示的是 ( A) 1 5 ( B) 0 5 ( C) 0 0 ( D)程序有错 8 以下叙述中错误的是 ( A) Sub Main是定义在标准模块中的特定过程 ( B)一个工程中只能有一个 Sub Main过程 ( C) Sub Main过程不能有返回值 ( D)当工程中含有 Sub Main过程时,工程执行时一定最先执行该过程 9 Visual Basic中的 “启动对象 ”是指启动 Visual Basic应用程序时,被自动加载并首先执行的对象。下列关于 Visual Basic“启动对象 ”的描述中,错误的是 ( A) “启动对象 ”可以是指 定的标准模块 ( B)
8、“启动对象 ”可以是指定的窗体 ( C) “启动对象 ”可以是 Sub Main过程 ( D)若没有经过设置,则默认的 “启动对象 ”是第一个被创建的窗体 10 以下关于 VB文件的叙述中,正确的是 ( A)标准模块文件的扩展名是 frm ( B) VB应用程序可以被编译为 exe文件 ( C)一个工程文件只能含有一个标准模块文件 ( D)类模块文件的扩展名为 bas 11 如果把程序的启动对象设置为: Sub Main,则 Sub Main过程 ( A)只能写在 Forml窗体中代码的最前面 ( B)可以写在 Forml窗体中代码的任何位置 ( C)只能写在某个标准模块的代码中 ( D)可以
9、写在仟何窗体或标准模块的代码中 12 以下叙述中,错误的是 ( A)标准模块不属于任何一个窗体 ( B)工程文件的扩展名为 vbg ( C)窗体文件的扩展名为 frm ( D)一个应用程序可以有多个窗体 13 以下关于键盘事件的叙述中,错误的是 ( A)按下键盘按键既能触发 KeyPress事件,也能触发 KeyDown事件 ( B) KeyDown、 KeyUp事件过程中,大、小写字母被视作相同的字符 ( C) KeyDown、 KeyUp事件能够识别 Shift、 Alt、 Ctrl等键 ( D) KeyCode是 KeyPress事件的参数 14 以下可以判断是否在文本框 (名称为 Te
10、xtl)内按下了回车键的事件过程是 ( A) Textl_Change ( B) Textl_Click ( C) Textl_KeyPress ( D) Textl_GotFocus 15 以下说法中正确的是 ( A)当焦点在某个控件上时,按下一个字母键,就会执行该控件的 KeyPress事件过程 ( B)因为窗体不接受焦点,所以窗体不存在自己的 KeyPress事件过程 ( C)若按下的键相同, KeyPress事件过程中的 KeyAscii参数与 KeyDown事件过程中的 KeyCode参数的值也相同 ( D)在 KeyPress事件过程中, KeyAscii参数可以省略 16 向文本
11、框中输入字符时,下面能够被触发的事件是 ( A) GotFocus ( B) KeyPress ( C) Click ( D) MouseDown 17 关于 KeVPress事件,以下叙述中正确的是 ( A)在控件数组的控件上按键盘键,不能触发 KeyPress事件 ( B)按 下键盘上任一个键时,都能触发 KeyPress事件 ( C)按字母键时,拥有焦点的控件的 KeyPress事件会被触发 ( D)窗体没有 KeyPress事件 18 下列事件的事件过程中,参数是输入字符 ASCII码的是 ( A) KeyDown事件 ( B) KeyUp事件 ( C) KeyPress事件 ( D)
12、 Change事件 19 文本框 Textl的 KeyDown事件过程如下: Private Sub TextlKeyDown(KeyCode As Integer, Shift As Integer)En d Sub其中参数 KeyCode的值表示的是发生此事件时 ( A)是否按下了 Alt键或 Ctrl键 ( B)按下的是哪个数字键 ( C)所按的键盘键的键码 ( D)按下的是哪个鼠标键 20 VB中有 3个键盘事件: KeyPress、 KeyDown、 KeyUp,若光标在 Textl文本框中,则每输入一个字母 ( A)这 3个事件都会触发 ( B)只触发 KeyPress事件 ( C
13、)只触发 KeyDown、 KeyUp事件 ( D)不触发其中任何一个事件 21 在窗体上画一个命令按钮和一个文本框 (名称分别为 Commandl和 Textl),并把窗体的 KevPreview属性设置为 True,然后编写如下代码: Dim SaveAll As String Private Sub Form Load() Text1 Text=“: Text1 SetFocus End Sub Private Sub Commandl_Click() Textl Text=LCase(SaveAll)+SaveAll End Sub Private Sub Form_KeyPress(
14、KeyAscii_ As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后,直接用键盘输入: VB,再单击命令按钮,则文本框中显示的内容为 ( A) vbVB ( B)不显示任何信息 ( C) VB ( D)出错 22 窗体上有一个 Text1文本框,并编写了下面事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) KeyAscii=KeyAscii+3 End Sub 程序运 行时,在文本框中输入字符 “A”,则在文本框中实际显示的是 ( A) A ( B) B ( C) C ( D
15、) D 23 对于文本框 Text1,能够获得按键的 ASCII码值的事件过程是 ( A) Text1 KeyUp ( B) Text1 KeyPress ( C) Text1 Click ( D) Text1 Change 24 将窗体的 KeyPreview属性设为 True,然后编写如下程序: Private Sub Form_KeyDown(KeyCode_ As Integer,Shift As Integer) Print Chr(KeyCodc) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print Chr(Kc
16、yAscii) End Sub 运行程序时,按下字母键 a,则窗体上显示的是 ( A) A A ( B) A a ( C) a A ( D) a a 25 在窗体上画 1名为 Commandl的命令按钮和 1名 Textl的文本框,再编写如下程序: Dim ss As String Private Sub Text1 KeyPress(KeyAscii As Integer) If Chr(KeyAscii)”Then ss=ss+Chr(KeyAscii) End Sub Private Sub Commandl_Click() Dim m As String, i As Integer F
17、or i=Len(ss)To 1 Step-1 m=m+Mid(ss, i, 1) Next Text1 Text=UCase(m) End Sub 程 序运行后,在文本框中输入 “Number 100”,并单击命令按钮,则文本框中显示的是 ( A) NUMBER 100 ( B) REBMUN ( C) REBMUN 100 ( D) 001 REBMUN 26 窗体上有 1个名称为 Text1、内容为空的文本框。编写如下事件过程: Private Sub Textl_KeyUp(KeyCode As Integer, Shift As Integer) Print Text1 Text;
18、End Sub 运行程序,并在文本 框中输入 “123”,则在窗体上的输出结果为 ( A) 123 ( B) 112 ( C) 12123 ( D) 112123 27 设窗体上有 2个文本框 Text1和 Text2,并有下面的事件过程: Dim n Private Sub Textl_KeyPress(KeyAscii As Integer) If”A”=Chr(KeyAscii)And Chr(KeyAscii)=”Z”Then n=n+1 End If If KeyAscii=13 Then Text2 Text=n End Sub 程序运行时,在文本框 Textl中输入 “Visua
19、l Basic 6 0”并按回车键后,在文本框Text2中显示的是 ( A) 2 ( B) 9 ( C) 13 ( D) 16 28 若看到程序中有以下事件过程,则可以肯定的是,当程序运行时 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)用鼠标右键单击
20、名称为 “MouseDown”的控件时,执行此过程 ( D)用鼠标左键或右键单击名称为 “Click”的控件时,执行此过程 29 设有窗体的 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)按下鼠标右键时,在窗体上显示 “检查
21、按键 ” ( C)同时按下鼠标左、右键时,在窗体上显示 “检查按键 ” ( D)不论做何种操作,窗体上都不会显示 30 要求当鼠标在图片框 P1中移动时,立即在图片 框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是 ( A) rivate 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 Sing
22、le, Y As Single) Picture Print X, Y End Sub ( C) Private Sub P1_MouseMove(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 31 窗体的 MouseUp事件过程如下: Pri
23、vate Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single, Y As Single) End Sub 关于以上定义,以下叙述中错误的是 ( A)根据 Shift参数,能够确定使用转换键的情况 ( B)根据 X、 Y参数可以确定触发此事件时鼠标的位置 ( C) Button参数的值是在 MouseUp事件发生时,系统自动产生的 ( D) MouseUp是 鼠标向上移动时触发的事件 32 命令按钮 Commandl的 MouseUp事件过程结构如下: Private Sub Commandl_MouseUp(Butto
24、n As Integer,Shift As Integer,X As Single, Y As Single) End Sub 则以下叙述中错误的是 ( A) X、 Y参数表示的是 Commandl左上角在窗体中的位置 ( B) Button参数用于确定按下的鼠标键 ( C) Shift参数用于确定是否按下了 Alt、 Ctrl或 Shift键 ( D) MouseUp表示抬起鼠标按键时触发的事件 33 有下面事件过程: Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single, Y As Single)
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 机试 多重 窗体 环境 应用 模拟 答案 解析 DOC
