《国家计算机二级___vb机试题库.docx》由会员分享，可在线阅读，更多相关《国家计算机二级___vb机试题库.docx（294页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、X二级VB上机试题汇编 - A - 第01套：1.基本操作（2小题，每小题15分，共计30分） 注意：下面出现的“考生文件夹”均为USER%请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。（1）在名称为Forml的窗体上画一个名称为Textl的文本框，其高、宽分别为 400、2000o请在属性框中设置适当的属性满足以下要求：1 ） Textl的字体为“黑体”，字号为“四号”；2）窗体的标题为“输入”，不显示最大化按钮和最小化按钮。运行后的窗体如图所示。注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl.vbp,窗体文件 名为 sjtl.fmio 解题思路：启
2、动Visual Basic系统，创建一个Forml窗体。在该窗体上画一个文本框控件，通过其属性窗口将名称设为Textl,高（Height属 性）设为400,宽（Width属性）设为2000,点击Font属性在弹出的字体时话框中将字体设为“黑体”，大小 设为四号激活Forml窗体，通过其属性窗口将标题（Caption属性）设为“输入”，最大化按钮（MaxButton 属性）设为False,最小化按钮（MinButton属性）设为False。参考文件：c:wexam26990001hlpsys参考答案sjtl.vbp、sjtl.frm、sjtl.vbw 请把这些文件复制到c:wexam269900
3、01中，然后打开sjtl.vbp文件并运行。（2）在名称为Forml的窗体上画一个名称为Imagel的图象框，利用属性窗口装 入考生目录下的图象文件picl.bmp,并设置适当属性使其中的图象可以 适应图象框大小；再画两个命令按钮，名称分别为Command 1、Command2, 标题分别为“向右移动”、“向下移动二请编写适当的事件过程，使 得在运行时，每单击“向右移动”按钮一次，图象框向右移动100；每单 击向下移动”按钮一次，图象框向下移动100。运行时的窗体如图所示。 要求程序中不得使用变量，事件过程中只能写一条语句。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp,窗体
4、文件 名为 sjt2.frm。BCE培训中心内部资料；教学咨询QQ： 1052205362国家教育部考试中心题库2 解题思路：启动Visual Basic系统，创建一个Forml窗体。在该窗体上画一个图象框控件，通过其属性窗口将名称设为Imagel,通过其Picture 属性将picl.jpg装入图片框，Stretch属性设为True。画二个命令按钮控件，通过其属性窗口将名称分别 设为 Command 1、Command2,标题（Caption属性）设为“向右移动”、“向下移动”。单击“向右移动”按钮（即运行Click事件过程），在该Click事件过程中加入语句： Private Sub Co
5、mmand 1 _Click（）I mage 1. Left = Imagel.Left + 100End Sub单击“向下移动”按钮（即运行Click事件过程），在该Click事件过程中加入语句： Private Sub Command2_Click（）Image 1.Top = Image 1.Top + 100End Sub参考文件：c:wexam26990001hlpsys参考答案sjt2.vbp、sjt2.frm、sjt2.frx sjt2.vbw 请把这些文件复制到c:wexam26990001中，然后打开sjt2.vbp文件并运行。2 .简单应用（2小题，每题20分，计40分）注
6、意：下面出现的“考生文件夹”均为USER%（1）在考生目录下有一个工程文件sjt3.vbp,窗体上有一个圆和一条直线（直 线的名称为Linel）构成一个钟表的图案：有两个命令按钮，名称分别为 Command 1, Command2,标题分别为“开始”、“停止”；还有一个名为 Timerl的计时器。程序运行时，钟表指针不动，单击“开始”按钮，则钟 表上的指针（即Linel）开始顺时针旋转（每秒转6。，一分钟转一圈）； 单击“停止”按钮，则指针停止旋转。运行时的窗体如图所示。请设置计时器的适当属性，使得每秒激活计时器的Timer事件一次；并编 写两个按钮的Click事件过程。文件中已经给出了所有控
7、件和部分程序，不得修改已有程序和其它控件 的属性；编写的事件过程中不得使用变量，且只能写一条语句。最后把 修改后的文件按原文件名存盘。BCE培训中心内部资料；教学咨询QQ： 1052205362国家教育部考试中心题库3解题思路：启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt3.vbp,相应的窗体 文件名为sjt3.frm。由于所提供的窗体控件不完整，通过其属性窗口将计时器的Enabled属性设为 False, Interval 属性设为1000o单击“开始”按钮（即运行Click事件过程），在该Click事件过程中加入语句： Private Sub Command 1
8、 _Click（）Timerl.Enabled = True End Sub单击“停止”按钮(即运行Click事件过程)，在该Click事件过程中加入语句： Private Sub Command2_Click()Timer 1.Enabled = FalseEnd Sub参考文件：c:wexam26990001hlpsys参考答案sjt3.vbp、sjt3.frm、sjt3.vbw 请把这些文件复制到c:wexam26990001中，然后打开sjt3.vbp文件并运行。(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体上有两个文本框、三个单 选按钮和一个命令按钮。运行时，在Textl中
9、输入若干个大写和小写字母， 并选中一个单选按钮，再单击“转换”按钮，则按选中的单选按钮的标题 进行转换，结果放入Text2 (如图所示)。在给出的窗体文件中已经给出了全部控件，但程序不完整，要求：去掉程序中的注释符，把程序中的？改为正确的内容。注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。解题思路：启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt4.vbp,相应的窗体 文件名为sjt4.frm由于所提供的窗体程序不完整，在命令按钮的Private Sub Commandl_Click()事件 过程中，有三处地方需要修改。1)将语句a = Mid$(T
10、extl.Text, ?, 1)改为a = Mid$(Textl.Text, k, 1)BCE培训中心内部资料：教学咨询QQ： 1052205362国家教育部考试中心题库42)将语句ch = ch + ?改为ch = ch + LCase(a)3)将语句Text2 = ?改为Text2 = ch参考文件：c:wexam26990001hlpsys参考答案sjt4.vbp、sjt4.frm、sjt4.vbw 请把这些文件复制到c:wexam26990001中，然后打开sjt4.vbp文件并运行。3 .综合应用(1小题，计30分)注意：下面出现的“考生文件夹”均为USER%在考生目录下有一个工程文
11、件sjt5.vbp。窗体中已经给出了所有控件(如图 所示)。请编写适当的事件过程完成以下功能：单.击“读数”按钮，则把考生目录下的in5.txt文件中的一个整数放入Textl；单击“计算”按钮,则计算出大于该数的第1个素数，并显示在Text2中；单击“存盘”按钮，则把找到的素数存到考生目录下的out5.txt文件中。注意：在结束程序运行之前，必须单击“存盘”按钮，把结果存入。ut5.txt文件，否则无成绩。最后把修改后的文件按原文件名存盘。解题思路：启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt5.vbp,相应的窗体 文件名为sjtS.frmo由于所提供的窗体程序不完
12、整，需添加事件过程。单击“计算”按钮(即运行Click事件过程)，在该Click事件过程中加入语句：Private Sub Command2_Click()a% = Clnt(Textl.Text)Doa% = a% + 1Loop Until isprime(a%)Text2.Text = a%End Subisprime函数是判断参数是否为素数的，函数中语句为：Function isprime(a As Integer)Dim flag As Booleank% = 2flag = TrueWhile k% sjt5.vbw、out5.txt 请把这些文件复制到c:wexam2699000
13、1中，然后打开sjt5.vbp文件并运行。 第02套：1 .基本操作(2小题，每小题15分，共计30分)注意：下面出现的“考生文件夹”均为USER%请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上用名称为Shapel的控件画一个圆，其直径为1500(即宽、高均为1500 ),并设置适当属性，使窗口标题为圆”，窗体标题栏上不显示最大化和最小化按钮（如图所示）。注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl.vbp,窗体文件名为 sjtl.fmio解题思路：启动Visual Basic系统，创建一个Forml窗体。在该窗体上用
14、Shape图形控件画一个园，通过其属性窗口将名称设为Shape 1,高 （Height 属性）设为 1500,宽（Wid出属性）设为1500, Shape属性设为3。激活Forml窗体，通过其属性窗 将标题（Caption属性）设为“圆”，最大化按钮（MaxButton属性）设为False,最小化按钮（MinButton属性）设为False。 参考文件：c:wexam26990001hlpsys参考答案sjtl.vbp、sjtl.frm、sjtl.vbw 请把这些文件复制到c:wexam26990001中，然后打开sjtl.vbp文件并运行。（2）在名称为Forml的窗体中建立一个弹出式菜单（
15、程序运行时不显示），名 称为file,含两个菜单项，其名称分别为open、save,标题分别为“打 开”、“存盘”。编写适当的事件过程。程序运行后，如果用鼠标右键 单击窗体，则弹出此菜单（如图所示）。注意：程序中不能使用变量。保存时必须存放在考生文件夹下，工程文件名为sjt2.vbp,窗体文件名为sjt2.frmBCE培训中心内部资料；教学咨询QQ： 1052205362国家教育部考试中心题库6解题思路：启动Visual Basic系统，创建一个Forml窗体。在该窗体上通过菜单编辑器建立一个主菜单，在菜单编辑器的标题处为空，名称处 输入file,将“可见”单选按钮设为不选状态。在该菜单下有二
16、个子菜单，在菜单编辑器的标题处分别输 入“打开”、“存盘”，名称处分别输入open、save。鼠标右键单击窗体（即运行MouseDown事件过程），在该MouseDown事件过程中 加入语句：Private Sub Form_MouseDown（Button As Integer, Shift As Integer, X As Single, Y As Single）If Button = 2 ThenPopupMenu fileEnd IfEnd Sub参考文件：c:wexam26990001hlpsys、参考答案sjt2.vbp、sjt2.frm、sjt2.vbw 请把这些文件复制到c:w
17、exam26990001中，然后打开sjt2.vbp文件并运行。2 .简单应用（2小题，每题20分，计40分）注意：下面出现的“考生文件夹”均为USER%(1)在考生目录下有一个工程文件sjt3.vbp,窗体上有一个组合框Combol,其 中已经预设了内容；还有一个文本框Textl和三个命令按钮，名称分别为 Command 1 Command2 Commands,标题分别为修改、确定、添 加”。程序运行时，“确定”按钮不可用，如图所示。程序的功能是：在运行时，如果选中组合框中的一个列表项，单击“修改 ”按钮，则把该项复制到Textl中(可在Textl中修改)，并使“确定”按 钮可用：若单击“确
18、定”按钮，则把修改后的Textl中的内容替换组合框 中该列表项的原有内容，同时使“确定”按钮不可用；若单击“添加”按 钮，则把在Textl中的内容添加到组合框中。所提供的窗体文件已经给出了所有控件和程序，但程序不完整，请去掉程 序中的注释符，把程序中的？改为正确的内容。但不能修改程序中的其 他部分，也不能修改控件的属性。最后把修改后的文件按原文件名存盘。 解题思路：启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt3.vbp,相应的窗体 文件名为sjt3.frm由于所提供的窗体控件不完整，通过属性窗口将“确定”按钮的Enabled属性设为 False o由于所提供的窗体程
19、序不完整，在“修改”按钮的Private Sub Commandl_Click() 事件过程中，有一处地方需要修改。1)将语句Command?. ? = TrueBCE培训中心内部资料；教学咨询QQ： 1052205362国家教育部考试中心题库7改为Command2.Enabled = True在“确定”按钮的Private Sub Command2_Click()事件过程中，有一处地方需要修 改。1)将语句Combol.List( ? ) = Textl改为Combo 1 .List(Combo 1 .Listindex) = Textl在添加按钮的Private Sub Command3_
20、Click()事件过程中，有一处地方需要修 改。1)将语句? Textl改为Combo 1. Additem Textl参考文件：c:wexam26990001hlpsys参考答案sjt3.vbp、sjt3.frm、sjt3.frx sjt3.vbw请把这些文件复制到c:wexam26990001中，然后打开sjt3.vbp文件并运行。（2）在考生目录下有一个工程文件sjt4.vbp,窗体中的两个滚动条分别表示红 灯亮和绿灯亮的时间（秒），移动滚动框可以调节时间，调节范围为1-10 秒。刚运行时，红灯亮。单击“开始”按钮则开始切换：红灯到时后自动 变为黄灯，1秒后变为绿灯：绿灯到时后自动变为黄
21、灯，1秒后变为红灯， 如此切换（如图所示）。所提供的窗体文件已经给出了所有控件和程序，但程序不完整，请去掉程 序中的注释符，把程序中的？改为正确的内容。提示：在三个图片框picturel、picture2, picture3中分别放置了红灯亮、绿 灯亮、黄灯亮的图标，并重叠在一起，当要使某个灯亮时，就使相应的 图片框可见，而其他图片框不可见，并保持规定的时间，时间到就切换 为另一个图片框可见，其他图片框不可见。注意：考生不得修改工程中已经存在的内容和控件属性，最后把修改后的文件 按原文件名存盘。解题思路：启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt4.vbp,相应的
22、窗体 文件名为sjt4.frnrio由于所提供的窗体程序不完整，在命令按钮的Private Sub Commandl_Click（）中， 有二处地方需要修改。1）将语句? = HScrolll. Value改为red = HScroll 1 .Value2）将语句Timerl.Enabled = ?改为Timer 1.Enabled = True由于所提供的窗体程序不完整，在计时器的Private Sub Timerl_Timer（）中，有二处 地方需要修改。1）将语句BCE培训中心内部资料；教学咨询QQ： 1052205362国家教育部考试中心题库81? .Visible = False改为
23、Picture 1. Visible = False2）将语句green = ?改为green = green - 1参考文件：c:wexam26990001hlpsys参考答案sjt4.vbp、sjt4.frm、sjt4.frx sjt4.vbw 请把这些文件复制到c:wexam26990001中，然后打开sjt4.vbp文件并运行。3 .综合应用(1小题，计30分)注意：下面出现的“考生文件夹”均为USER%在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件是sjt5.frm ( 如图所示)。该程序的功能是：单击“读数”按钮，读入考生文件夹下 in5.txt文件中的一个整数，并放
24、入Textl中；单击“计算”按钮，则计算 小于该数的最大素数，并显示在Text2中：单击“存盘”按钮，则把该素数 保存到考生文件夹下的out5.txt文件中。要求：1)程序已给出“存盘”按钮的事件过程代码。“读数”按钮的事件过程 和判断x是否是素数的函数prime (x)不完整，请去掉注释，并在？ 处填上正确的内容，使程序完整。2)编写“计算”按钮的事件过程。计算小于Textl中数据的最大素数。3)请不要改动窗体上所有控件属性设置及相应的过程代码。最后将改动 后的程序用原文件名保存。解题思路：启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt5.vbp,相应的窗体 文件名
25、为sjt5.frm。由于所提供的窗体程序不完整，需添加事件过程。执行“计算”命令(即运行Click事件过程)，在该Click事件过程中加入语句： Private Sub Command2_Click()n = Val(Textl.Text)For i = n To 2 Step -11 = prime(i)If 1 = True ThenExit ForEnd IfNextText2.Text = iEnd Sub在读数按钮的Private Sub Commandl_Click()中，有一处地方需要修改。1)将语句Input#1,?BCE培训中心内部资料：教学咨询QQ： 1052205362国
26、家教育部考试中心题库9改为Input #1, a%在函数Function prime(x) As Boolean 111 有一处地方需要修改。1)将语句 prime = ?改为prime = flag参考文件：c:wexam26990001 hlpsys#sjt5.vbp sjt5.frm、sjt5.vbw、out5.txt 请把这些文件复制到c:wexam26990001中，然后打开sjt5.vbp文件并运行。 第03套：1 .基本操作（2小题，每小题15分，共计30分） 注意：下面出现的“考生文件夹”均为USER%请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）
27、。（1）在名称为Forml的窗体上画一个名称为Framel,标题为“目的地”的框架， 在框架中添加三个复选框，名称分别为Checkl、Check2、Check3,其标题 分别是“上海”、“广州”、“巴黎，其中“上海”为选中状态，“广 州”为未选状态，“巴黎”为灰色状态，如图所示。请画控件并设置相应 属性。注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl.vbp,窗体文件名为 sjtl.frrrio解题思路：启动Visual Basic系统，创建一个Forml窗体。在该窗体上画一个框架控件，通过其属性窗口将名称设为Framel,标题（Caption 属性）设为“目的地二在F1框架中画三个
28、复选框控件，通过其属性窗口将名称分别设为Checkl、Check2、 Check3,标题（Caption 属性）分别设为“上海”、“广州”、“巴黎”，“上海”的Value属性设为1, “巴黎”的Value 属性设为2。参考文件：c:wexam2699000八hlpsys参考答案sjtl.vbp、sjtl.frm、sjtl.vbw 请把这些文件复制到c:wexam26990001中，然后打开sjtl.vbp文件并运行。（2）在名称为Forml的窗体上画一个名称为Picturel的图片框，其宽和高分别 为1700、1900。请编写适当事件过程，使得在运行时，单击图片框，则装 入考生目录下的图形文件
29、picl.bmp,如图所示。单击窗体则图片框中的图 形消失。要求程序中不得使用变量，每个事件过程中只能写一条语句。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp,窗体文件名BCE培训中心内部资料；教学咨询QQ： 1052205362国家教育部考试中心题库 10为 sjt2.frm。解题思路：启动Visual Basic系统，创建一个Forml窗体。在该窗体上画一个图片框，通过其属性窗口将名称设为Picturel,宽度（Width属性)设为1700,高度(Height属性)设为1900o单击图片框(即运行Click事件过程)，在Click事件过程中加入语句:Picture .
30、PictureLoadPicture(picl.bmp),即将考生目录下的图形文件picl.bmp装入图片框中。单 击窗体(即运行Click事件过程)在Click事件过程中加入语句:Picture 1.Picture = LoadPicture().即图片框 中的图形消失。参考文件：c:wexam26990001hlpsys参考答案sjt2.vbp、sjt2.frm、sjt2.vbw 请把这些文件复制到c:wexam26990001中，然后打开sjt2.vbp文件并运行。2 .简单应用(2小题，每题20分，计40分)注意：下面出现的“考生文件夹”均为USER%(1)在考生目录下有一个工程文件s
31、jt3.vbp,窗体文件中已给出所有控件和部 分程序，如图所示。要求：1)利用属性窗口设置适当的属性，使textl、text2中数据右对齐；2)请编写适当的程序完成以下功能：在Textl中输入40 (度数)，选择一个单选按钮，单击“计算”按钮，则根据所选择的单选按钮，计 算出相应的正弦、余弦值(保留3位小数，第4位截去，n取3.14159 ),并显示在Text2中。注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须进行一种计算，在Textl中输入的必须是40,必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。解题思路：启动Visual Basic系统，
32、打开考生文件夹下需编辑的工程文件sjt3.vbp,相应的窗体 文件名为sjt3.frm由于所提供的窗体控件不完整，通过属性窗口将文本框的对齐格式(Alignment属 性)均设为loBCE培训中心内部资料；教学咨询QQ： 1052205362国家教育部考试中心题库 11由于所提供的窗体程序不完整，需添加事件过程。单击“计算”按钮(即运行Click事件过程)，在该Click事件过程中加入语句：Private Sub Command l_Click()If Option 1 .Item(0) = True ThenText2.Text = Format(Sin(Val(Textl .Text) *
33、 3.14159 / 180), 0.000)End IfIf Option l.Item(l) = True ThenText2.Text = Format(Cos(Val(Textl.Text) * 3.14159 / 180), 0.000)End IfEnd Sub参考文件：c:wexam26990001hlpsys参考答案sjt3.vbp、sjt3.frm、sjt3.vbw、out3.txt 请把这些文件复制到c:wexam26990001中，然后打开sjt3.vbp文件并运行。(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经给出所有控件。程 序运行时，单击“开始”按钮
34、，则汽车图标向右运动；单击“停止”按钮 则汽车停止运动：移动滚动条上的滚动框，可以改变汽车的运动速度(滚 动框向右移动，速度减慢)。如图所示。要求：去掉程序中的注释符，把程序中的？改为正确的内容。提示：窗体上有一个计时器，计时器的事件过程每执行一次，汽车向右移动10,程序通过改变计时器控件的Interval属性来改变汽车的运动速度。注意：不得修改控件的属性。最后，按原文件名存盘。解题思路：启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt4.vbp,相应的窗体 文件名为sjt4.frm由于所提供的窗体程序不完整，在“开始”按钮的Private Sub Commandl_C
35、lick() 事件过程中，有一处地方需要修改。1)将语句Timerl.Enabled = ?改为Timerl.Enabled = True在滚动框的Private Sub HScrolll_Change()事件过程中，有一处地方需要修改。1)将语句?.Interval = HScrolll. Value改为Timerl. Interval = HScroll 1 .Value在计时器的Private Sub Timerl_Timer()事件过程中，有一处地方需要修改。1)将语句Picture l.Left = ? + 10改为BCE培训中心内部资料；教学咨询QQ： 1052205362国家教育
36、部考试中心题库 12Picture l.Left = Picture 1 ,Left + 10参考文件：c:wexam26990001hlpsys参考答案sjt4.vbp、sjt4.frm、sjt4.frx、sjt4.vbw 请把这些文件复制到c:wexam26990001中，然后打开sjt4.vbp文件并运行。3 .综合应用(1小题，计30分)注意：卜面出现的“考生文件夹”均为USER%以下数列：1, 1, 2, 3, 5, 8, 13, 21,的规律是从第3个数开始，每 个数是它前面两个数之和。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件，如图 所示。请编写适当的事
37、件过程实现以下功能：在Textl中输入整数40,单击“计算”按钮，则在Text2中显示该数列第40项的值；如果单击“存盘”按 钮，则将计算的第40项的值存到考生目录下的out5.txt文件中。(提示：因 数据较大，应使用Long型变量) 注意：在结束程序运行之前必须单击“存盘”按钮，把结果存入out5.txt文件， 否则无成绩。最后把修改后的文件按原文件名存盘。解题思路：启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt5.vbp,相应的窗体 文件名为sjt5.frm。由于所提供的窗体程序不完整，需添加事件过程。单击“计算”按钮(即运行Click事件过程)，在该Click
38、事件过程中加入语句：Private Sub Command 1 _Click()Dim fl, f2, f As LongDim a(40) As Longfl = 1f2= 1a(l) = fla(2) = f2For i = 3 To Val(Textl.Text)f=fl +f2a(i) = ffl=f2f2 = fNextText2.Text = a(40)End Sub参考文件：c:wexam26990001hlpsys参考答案sjt5.vbp、sjt5.frm sjt5.vbw、out5.txt 请把这些文件复制到c:wexam26990001中，然后打开sjt5.vbp文件并运行
39、。 第 04 ：1 .基本操作(2小题，每小题15分，共计30分)注意：下面出现的“考生文件夹”均为USER%BCE培训中心内部资料；教学咨询QQ： 1052205362国家教育部考试中心题库 13请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为Combol的组合框，其宽度为1200, 其类型如图所示(即简单组合框)。要求：1）请按图中所示，通过属性窗口输入“北京”、“上海”、“广州”、 “深圳”。2）设置适当的属性，使得运行时，窗体的最大化按钮和最小化按钮消 失。注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl
40、.vbp,窗体文件名为 sjtl.frrrip解题思路：启动Visual Basic系统，创建一个Forml窗体。在该窗体上画一个组合框控件，通过其属性窗口将名称设为Combo 1,宽（Width 属性）设为1200, Style属性设为1,向组合框中添加项目（List属性），添加的项目分别为“北京、“上海、 “广州”、“深圳”，每个项目为一行。激活Forml窗体，通过其属性窗口将最大化按钮（MaxButton属 性）设为False,最小化按钮（MinButton 属性）设为 False。参考文件：c:wexam26990001hlpsys参考答案sjtl.vbp、sjtl.frm, sjtl
41、.frx、sjtl.vbw 请把这些文件复制到c:wexam26990001中，然后打开sjtl.vbp文件并运行。（2）在名称为Forml的窗体上画两个文本框，名称分别为Textl、Text2,再画两个命令按钮，名称分别为Commandh Command2,标题分别为“左”、“ 右”,见图2。要求：编写适当的事件过程，使得程序运行时，单击“左”按钮，则焦点位于Textl上；单击“右”按钮，则焦点位于Text2上。意：程岸中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp,窗体文件名为 sjt2.frm。BCE培训中心内部资料；教学咨询QQ：
42、1052205362国家教育部考试中心题库 14解题思路：启动Visual Basic系统，创建一个Forml窗体。在该窗体上画二个文本框控件，通过其属性窗口将名称分别设为Textl和Text2。 画二个命令按钮控件，通过其属性窗口将名称分别设为Commandl、Command?,标题（Caption属性）分别 设为“左”、“右二单击“左按钮（即运行Click事件过程），在该Click事件过程中加入语句：Private Sub Command 1 _Click（）Textl.SetFocusEnd Sub单击“右”按钮（即运行Click事件过程），在该Click事件过程中加入语句： Priva
43、te Sub Command2_Click（）Text2.SetFocusEnd Sub参考文件：c:wexam26990001hlpsys参考答案sjt2.vbp、sjt2.frm、sjt2.vbw 请把这些文件复制到c:wexam26990001中，然温打开sjt2.vbp文件并运行。2 .简单应用（2小题，每题20分，计40分）注意：下面出现的“考生文件夹”均为USER%（1）在考生目录下有一个工程文件sjt3.vbp,窗体上有一个命令按钮Command1 （标题为“下一个要求：在窗体上建立一个单选按钮数组Option 1,含4个单选按钮，标题分别为“选项1”、“选项2”、“选项3”、“
44、选项4”，初始状态下，”选择1”为选中状态。如图所示。窗体文件中已经给出了命令按钮的Click 事件过程，但不完整，请去掉程序中的注释符，把程序中的？改为正 确的内容，使得每单击命令按钮一次，就选中下一个单选按钮，如果已 经选中最后一个单选按钮，再单击命令按钮，则选中第1个单选按钮。 注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。解题思路：启动Visual Basic系统，打开考生文件夹下需编辑的工程文件sjt3.vbp,相应的窗体 文件名为sjt3.frm。由于所提供的窗体控件不完整，需在该窗体上画一个单选按钮控件，通过对单选按 钮控件的复制产生单选按钮控件数组，共有四个
45、单选按钮，标题（Caption属性）分别设为“选项1”、“选 项2”、“选项3”、“选项4”，“选项”的Value属性设为True。由于所提供的窗体程序不完整，在“卜一个按钮的Private Sub Commandl_Click（） 事件过程中，有三处地方需要修改。1）将语句For k = 0 To ?改为For k = 0 To 32）将语句n = ?改为BCE培训中心内部资料；教学咨询QQ： 1052205362国家教育部考试中心题库 15 n = k3)将语句n = ?改为n = 0参考文件：c:wexam26990001hlpsys参考答案sjt3.vbp、sjt3.frm、sjt3.vbw 请把这些文件复制到c:wexam26990001中，然后打开s