重庆计算机二级VB上机模拟题
国家二级VB机试(上机操作)模拟试卷344(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷344(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1、标题为“鼠标光标形状”的窗体上画一个名称为Text1的文本框。
请通过属性窗口设置适当属性，使得程序运行时，鼠标在文本框中时，鼠标光标为箭头(Arrow)形状；在窗体中其他位置处，鼠标光标为十字(Cross)形状。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。
(2)在名称为Form1的窗体上画两个标签，名称分别为Label1、Label2，标题分别为“开始位置”、“选中的字符数”；画三个文本框，名称分别为Text1、Text2、Text3，再画一个名称为Command1，标题为“显示选中信息”的命令按钮。
程序运行时，在Text1中输入若干字符，并用鼠标选中一些字符后，单击“显示选中信息”按钮，则把选中的第一个字符的顺序号显示在Text2中，选中的字符个数显示在Text3中，如图3．152所示。
要求：画出所有控件，编写命令按钮的Click事件过程。
注意：要求程序中不得使用变量，事件过程中只能写两条语句，分别用于显示第一个字符的顺序号和显示选中的字符个数。
存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：(1)步骤1：新建“标准EXE”工程，按要求画出控件并设置相应属性。
步骤2：按要求将文件保存至考生文件夹中。
(2)步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。
步骤2：在代码编辑窗口，编写命令按钮的单击事件过程。
参考代码：Private Sub Command1_Click( )Text2=Text1．SelStart+1Text3=Text1．SelLengthEnd Sub步骤3：按要求将文件保存至考生文件夹中。
解析：(1)根据题目要求，要使鼠标指针位于文本框中时，鼠标指针的形状为箭头，需将文本框的MousePointer属性值设置为1。
国家二级VB机试(上机操作)模拟试卷450(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷450(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1的窗体上添加两个名称分别为Text1和Text2的文本框，它们的高、宽分别为300、2400和1200、2400。
窗体的标题为“窗口”。
请通过属性窗口设置适当的属性，满足如下要求：①Text2可以业示多行文本，并且有垂直和水平两个滚动条；②程序运行时在Text1中显示输入的字符为“*”。
程序运行后的窗体如图所示。
注意：存盘时必须存放在考生文件夹下。
工程文件名保存为sjt1．vbp，窗体文件名保存为sjt1．frm。
(2)在名称为Form1的窗体上添加一个名称为Image1的图像框，其高、宽分别为1900、1700，通过属性窗口把考生文件夹下的图像文件pic1．bmp载入图像框；再画两个命令按钮控件，名称分别为C1、C2，标题分别为“放大”、“缩小”，如图所示。
要求：①请编写适当的事件过程，程序运行后，如果单击“放大”按钮，则将图像框的高度、宽度均增加100；单击“缩小”按钮，则将图像框的高度、忧度均减少100，要求程序中不得使用任何变量。
②通过属性窗口设置图像框的适当属性，使得在放大、缩小图像框时，其中的图像也自动放大、缩小。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sjt2．frm。
正确答案：(1)步骤1：新建一个窗体，按照题目要求建立文本框控件并设置其属性，程序中涉及的控件及属性见表3．8和表3．9。
步骤2：调试并运行程序，关闭程序后按题目要求存盘。
(2)步骤1：新建一个窗体，按照题目要求建立控件并设置图像框相应属性，如图3．17所示。
步骤2：按照步骤1设置其他控件相关属性，程亭中涉及的控件及属性见表3．10。
步骤3：打开代码编辑窗口，在指定位置编写如下代码。
参考答案Private Sub C1 Click( )’当单击”放大”按钮时，依次将Imagel的高与宽分别加100 Imagel．Height=Imagel．Height+i00 Imagel．Width=Imagel．Width+100 End Sub Private Sub C2 Click( )’当单击”缩小”按钮，则依次将Imagel的高与宽分别减100 Imagel．Height=Imagel．Height—100 Imagel．Width=Imagel．Width一100 End Sub 步骤4：调试并运行程序，关闭程序后按题目要求存盘。
国家二级VB机试(上机操作)模拟试卷210(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷210(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1、标题为“列表框练习”的窗体上画一个名称为List1的列表框，表项内容依次输入xxx、ddd、mmm和aaa，且以宋体14号字显示表项内容，如图2．93(a)所示。
最后设置相应属性，使运行后列表框中的表项按宁母升序方式排列，如图2．93(b)所示。
注意：存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt1．frm，上程文件名为sjt1．vbp。
(2)在名称为Form1的窗体上，画一个名称为Labell的标签，其标题为“计算机等级考试”，字体为宋体，字号为12号，且能根据标题内容自动调整标签的大小。
再画两个名称分别为Command1、Command2，标题分别为“缩小”和“还原”的命令按钮(如图2．94所示)。
要求：编写适当的事件过程，使得单击“缩小”按钮，Labell中所显示的标题内容自动减小两个字号：单击“还原”按钮，Labell所显示的标题内容的大小自动恢复到12号。
注意：存盘时，将文件保存至考生文件夹下，窗体文仲名为sjt2．frm，工程文件名为sjt2．vbp。
要求程序中不得使用变量，每个事件过程中只能写一条语句。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程。
如表3-52存窗体中画出控件并设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，如表3．53在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，编写两个命令按钮的Click事什过程。
参考代码：Private Sub Commandl—Click( ) Labell．FontSize=Labell．FontSiZe一2 End Sub Private Sub Command2一Click( ) Labell．FontSiZe=12 End Sub 步骤3：按要求将文件保存至考生文件夹中。
国家二级VB机试(上机操作)模拟试卷600(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷600(题后含答案及解析)题型有：1.jpg /> 步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案PriVate Sub Commandl_Click( ) Text2=Textl．SelLength End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。
【易错提示】SelLength属性与SelStart和SelText属性容易混淆，SelStart属性是返回／设置选定文本的起始点，SelText属性是返回／设置当前选定文本的字符串。
解析：selLength属性用于返回／设置选定的字符数，通过文本框的Name 和Caption属性设置文本框的名称和标题，通过命令按钮的Name和Cap．tion 属性设置命令按钮的名称和标题。
简单应用题3．在考生文件夹下有一个工程文件sjt3．vbp。
程序运行后，单击“读入数据”按钮，可将考生文件夹下in3．1xt文件中的所有英文单词读入，并在Textl 文本框中显示；单击“插入列表框”按钮，则按顺序将每个单词作为一项添加到List1列表框中(如图所示)。
在in3．txt文件中，每个单词之间用一个空格字符隔开，最后一个单词的后面没有空格。
已经给出了所有控件和程序，但程序不完整。
要求：请去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分和控件属性。
最后用原来的文件名保存工程文件和窗体文件。
正确答案：【操作步骤】步骤l：打开本题工程文件。
步骤2：打开代码编辑窗口，去掉程序中的注释符“′”，将问号改为正确的内容。
参考答案(阴影部分是需考生填入的内容) Private Sub Commandl_C1ick( ) Dim st$．ch$ Open App．Path＆＂＼in3．txt＂For In—put As#’打开文件Do While Not EOF(1)′文件指针是否到达文件末尾Input#1，ch′达到文件末尾返回true．否则返回false st=st＆ch′将读出的数据加到原有数据末尾Loop Close#1′关闭文件Textl=st′将内容显示在文本框中End Sub Private Sub Command2_Click( ) Dim st$，word$，C$ St=Textl n=Len(St) For k=1 TO n c=Mid(st，k，1)′从st 中依次取出1个字符进行比较If c＜＞＂＂Then word=word＆C E1Se Listl．AddItem word word=＂＂将word清空，为下一次作准备End If Next LiStl．AddItem word End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。
国家二级VB机试(上机操作)模拟试卷599(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷599(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．在标题为“列表框”、名称为Forml的窗体上添加一个名称为Listl的列表框，通过属性窗口输入4个列表项：“数学”、“语文”、“历史”、“地理”，列表项形式采用复选框形式，如图所示。
列表框的宽为1100，高不限。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjtl．frm。
正确答案：【操作步骤】步骤1：新建一个窗体，按照题目要求建立列表框控件并设置窗体及列表框属性，如图4．29所示。
程序中用到的控件及属性见表4．4l。
步骤2：调试并运行程序，关闭程序后按题目要求存盘。
解析：列表框的Style属性只能在设计时确定。
用于控制控件的外观，其数值可以设置为0(标准样式)和l(复选框样式)。
通过列表框的Name和Width属性来设置列表框的名称和宽，通过其List属性设置列表项。
2．在名称为Forml的窗体上建立一个名称为“menul”、标题为“文件”的弹出式菜单，其含有三个菜单项，它们的标题分别为：“打开”、“关闭”、“保存”，名称分别为“ml”、“m2”、“m3”。
再添加一个命令按钮，名称为“Commandl”、标题为“弹出菜单”。
要求：编写命令按钮的Click事件过程，使程序运行时，单击“弹出菜单”按钮可弹出“文件”菜单(如图所示)。
注意：程序中不得使用变量，事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sjt2．frm。
正确答案：【操作步骤】步骤l：建立界面，添加一个命令按钮，设置其Name属性为Commandl，Caption属性为“弹出菜单”。
然后建立一个菜单，菜单的属性见表4．42。
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案PriVate Sub Commandl_Click( ) PopupMenu menul’显示菜单menul End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。
国家二级VB机试(上机操作)模拟试卷147(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷147(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2，标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Text2和Text2，初始内容均为空)和一个命令按钮(名称为Command1，标题为“显示”)。
然后编写命令按钮的Click事件过程。
稗序运行后，祚两个文本框中分别输入姓名和年龄，然后单击“显示”按钮，则在窗体上显示两个文本框中的内容，如图所示。
要求程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为为sjt1．vbp，窗体文件名保存为sjt1．frm。
(2)在名称为Form1的窗体上画一个图片框，其名称为Picture1，一个水半滚动条，名称为HScroll1，一个命令按钮，名称为Command1，标题为“设置属性”，通过属性窗口在图片框中装入一个图形(文件名为picl．jpg，位于考生目录下)，图片框的高度与幽形的高度相同，图片框的宽度任意(如图1所爪)。
编写适当的事件过程，程序运行后，如果单击命令按钮，则设置水平滚动条的属性如下：Min 100 Max 1500 LargeChange 100 SmallChange 10 之后就可以通过移动滚动条上的滚动块来放大或缩小图片框。
程序运行后的窗体如图2所示。
要求程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：(1)步骤1：新建一个窗体，按照题目璎求建立控件并设置相应属性，程序中用到的控件及属性如表3．16所示。
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案Private Sub Command1_C1ick( ) Form1．Print Text1．Text＆”，现年”＆Text2．Text＆”岁”End Sub 步骤3：调试并运行程序．关闭程序后按题目要求存盘。
国家二级VB机试(上机操作)模拟试卷488(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷488(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为CmdChange、标题为“改变颜色”的命令按钮，窗体标题为“设置窗体背景色”。
编写程序，使得单击命令按钮时，将窗体的背景颜色改为红色(＆HFF＆)。
运行程序后的窗体如图3－142所示。
要求：程序中不得使用变量，每个事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名为vbsj1．vbp，窗体文件名为vbsj1．frm。
(2)在名称为Form1的窗体上画一个命令按钮和一个垂直滚动条，其名称分别为Cmd1(标题为“设置”)和Vsb1，编写适当的事件过程。
程序运行后，如果单击命令按钮，则按如下要求设置垂直滚动条的属性：Max＝窗体高度Min ＝0 LargeChange＝50 SmallChange＝10 如果移动垂直滚动条的滚动框，则在窗体上显示滚动框的位置值。
程序的运行情况如图3—143所示。
要求：不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为vbsj2．vbp，窗体文件名为vbsj2．frm。
正确答案：第1小题【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体Form1中画一个命令按钮，设置相关属性，其属性及值如表4－83所示。
步骤2：打开代码编辑窗口，编写按钮的Click事件过程中。
参考代码：Private Sub cmdChange_Click( ) BackColor＝＆HFF ＆End Sub 步骤3：按要求将文件保存至考生文件夹中。
第2小题【操作步骤】步骤1：新建一个“标准EXE”工程，按表4－84在窗体中画出控件并设置其相关属性。
步骤2：打开代码编辑窗口，编写水平滚动条的Change事件过程。
国家二级VB机试(上机操作)模拟试卷311(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷311(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为Combo1的组合框，其宽度为1200，其类型如图3—188所示(即简单组合框)。
要求如下：①请按图中所示，通过属性窗口输入“北京”、“上海”、“广州”、“深圳”。
②设置适当的属性，使得运行时，窗体的最大化按钮和最小化按钮消失。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
(2)在名称为Form1的窗体上画两个文本框，名称分别为Text1、Text2，再画两个命令按钮，名称分别为Command1、Command2，标题分别为“左”、“右”，如图3—189。
要求：编写适当的事件过程，使得程序运行时，单击“左”按钮，则焦点位于Text1上；单击“右”按钮，则焦点位于Text2上。
注意：程序中不得使用变量，事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：第1小题步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。
步骤2：按要求将文件保存至考生文件夹中。
第2小题步骤1：新建一个“标准EXE”工程，按要求画出控件并设置属性。
步骤2：双击“左”命令按钮，打开代码编辑窗口，在按钮的Click事件过程中输入代码。
步骤3：从代码编辑窗口的“对象”下拉列表中选择Command2，从“事件”下拉列表选择Click，编写以下事件过程。
参考代码：Private Sub Command1_Click( )Text1．SetFocuSEnd SubPrivate Sub Command2_Click( )Text2．SetFocusEnd Sub步骤4：按要求将文件保存至考生文件夹中。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
一、基本操作题请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。
1、在名称为Form1的窗体上画一个名称为Chk1的复选框数组（Index属性从0开始），含三个复选框，其标题分别为“语文”、“数学”、“英语”。
利用属性窗口设置适当的属性，使“语文”未选，“数学”被选中，“英语”为灰色，再把窗体的标题设置为“选课”，程序运行时的窗体界面如图所示。
2、在名称为窗体上画一个命令按钮，其名称为Cmd1，标题为“清除”。
请编写适当的事件过程，使得程序运行后，窗体上的标题为“VB期末上机考试”，如图1所示，如单击命令按钮，则清除窗体的标题，程序运行时的窗体界面如图2所示。
图1 图23、在名称为Form1的窗体上画一个命令按钮，其名称为Cmd1，标题为“移到左上”。
编写适当的事件过程，使程序运行时，如单击命令按钮，则按钮移到窗体的左上角。
程序中不得使用任何变量。
程序运行时的窗体界面如图。
4、在名称为Form1的窗体上建立一个名称为L1的标签，标题为“选课”，其字号大小为4号；再建立三个复选框，名称分别为Chk1、Chk2、Chk3，标题分别为“操作系统”、“数据库原理”、和“概率论”，字体大小均为14，其中“概率论”被禁用，运行界面如图。
5、在Form1的窗体上画一个命令按钮，其名称为Cmd1，标题为“显示”；再画一个文本框，其名称为Txt1，编写适当的事件过程。
程序运行后，在窗体加载时使文本框不可见，如双击窗体，则文本框出现；此时如单击命令按钮，则在文本框中显示“期末考试”，如图所示。
6、在名称为Form1的窗体上，画一个组合框和一个命令按钮。
组合框的名称为Cbo1，初始内容为空，有“长跑”、“游泳”、和“跳远”三个可供选择项。
命令按钮的名称为Cmd1，Opt2，标题为“确定”。
编写适当的事件过程，使得程序运行时，选择组合框中的某项，单击命令按钮后，就会弹出一个对话框，内容为“您选择了（该项）”。
程序中不得使用任何变量。
程序运行时的窗体界面如图所示。
7、在名称为Form1的窗体上画一个名称为H1的水平滚动条，请在“属性”窗口中设置它的属性值，使之满足以下要求：它的最大刻度值为100，最小刻度值为1，在运行时鼠标单击滚动条上滚动框以外的区域（不包括两边的按钮），滚动框移动10个刻度。
再在滚动条下面画两个名称分别为L1和L2的标签，并分别显示1和100，运行时的窗体界面如图所示。
8、在名称为Form1的窗体上画两个文本框，无初始内容；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下有两个子菜单项，名称分别为Copy和Clear，标题分别为“复制”和“清除”。
请编写适当的事件过程，使得程序运行时，单击“复制”菜单项，则把Text1中的内容复制到Text2中，单击“清除”菜单项，则清除Text2中的内容。
程序运行时的窗体界面如图所示。
要求在程序中不得使用任何变量，每个事件过程中只能写一个语句。
9、在Form1的窗体上画一个文本框，其名称为Text1，程序运行时，在文本框中输入字符，文本框中的字符将赋值到窗体的标题栏中。
注意，本程序代码中不得使用任何变量。
程序运行时的窗体界面如图所示。
10、在窗体上有一个名称为text1的文本框，一个名称为C1，标题为“校验”的命令按钮。
其中文本框用来输入口令，要求在文本框中输入的内容都必须以“*”显示（通过属性窗口设置）。
要求程序运行后，输入口令，单击命令按钮后，对口令进行校验。
如果输入的内容是“ABC”这3个大写字母，则用MsgBox信息框输出“正确”，否则输出“错误”。
如图所示。
二、简单应用题1、在窗体Form1上已有两个文本框，一个命令按钮，命令按钮标题为“转换”。
要求在窗体上补充三个单选钮，名称分别为Opt1、Opt2、Opt3，标题分别为“大小写转换”、“全部大写”、“全部小写”。
要求补充完整代码窗口的代码后，在Text1中输入一段字符，选中“大小写转换”，单击转换按钮后，Text2中显示大小写相反的字符串；选中“全部大写”，单击转换按钮后，Text2中显示全部大写字符串，选中“全部小写”，单击转换按钮后，Text2中显示全部小写字符串。
界面如图。
Private Sub Command1_Click()Dim n As Integer, k As Integer, ch As String, a As Stringch = ""If Opt1.Value = True Thenn = Len(？)For k = 1 To na = Mid$(Text1, k, ？)If a >= "a" And a <= "z" Thench = ch + UCase(a)ElseIf a >= "A" And a <= "Z" Thench = ch + LCase(a)Elsech = ch + aEnd IfNext kEnd IfIf Opt2.Value = True Then ch = UCase(Text1)If Opt3.Value = True Then ch = ？(Text1)Text2 = chEnd Sub2、编写程序，演示列表框控件的基本操作。
在窗体上建立两个列表框，两个命令按钮。
程序运行后，在第一个列表框中选择所需要的项目，单击“添加”按钮，把所选择的项目移到第二个列表框中。
如果单击“删除”按钮，则执行相反的操作。
程序运行时的窗体界面如图。
3、在窗体上建立一个命令按钮，标题为“输出最大值”。
要求产生30个0~100的随机整数，放入一个数组中，然后输出其中的最大值。
请把程序中有“？”号的地方补充完整。
程序运行时的效果如图。
Option Base 1Private Sub Command1_Click()Dim arrn(30) As Integer, max As IntegerRandomizeFor i = 1 To 30arrn(i) = Int(Rnd * ？) 101Next i？= arrn(1) maxFor i = 2 To 30If ？Then max = arrn(i) arrn(i)>maxNext iPrint maxEnd Sub4、在Form1的窗体上有一个名称为Txt1的文本框和两个命令按钮，命令钮名称分别为Cmd1和Cmd2，标题分别为“显示A”和“显示B”。
要求程序运行后，如单击“显示A”命令按钮，则弹出对话框，输入要显示的个数，根据输入的数值在文本框中显示相应数量的字符串A；如单击“显示B”命令按钮，也弹出对话框，输入要显示的个数，根据输入的数值在文本框中显示相应数量的字符串B。
程序运行时的窗体界面如图所示。
5、在窗体上建立一个名称为Label1和Label2的2个标签，单击命令按钮command1，使Label1中的内容与Label2中的内容互换，按命令按钮Command2，结束程序。
6、在窗体Form1上有一个文本框，名称为Text1；请在窗体上画两个框架，名称分别为F1和F2，标题分别为“性别”和“身份”；在F1中画两个单选钮Op1和Op2，标题分别为“男”和“女”；在F2中画两个单选钮Op3和Op4，标题分别为“学生”和“教师”；再画一个命令按钮，名称为C1，标题为“确定”。
程序运行时的窗体界面如图所示。
请编写适当的事件过程，使得在运行时，在F1和F2中各选一个按钮，然后单击“确定”按钮，就可以照表中内容把结果显示在文本框中。
7、编写一个通用过程FindMax 求数组的最大值。
在窗体上的4个文本框中各输入一个整数作为各数组元素的值，然后单击命令按纽，即可求出数组的最大值，并在窗体显示出来，如图所示。
8、 有一文档不完整，在有“？”的地方把程序补完整orm 上有一个text1, 一个command1,要求在text1中添入文本，但用“*”显示，若文本是“ABC”，则msgbox"正确",否则msgbox"错误" 以给程序：Private Sub command1.Click()if text1.text="?" then msgbox"正确" Else msgbox"错误" ABC end sub9、在窗体Form1上画一个图像框，其高、宽分别为600，通过属性窗口把一个图像文件装入图像框；再画一个命令按钮，标题为“放大”。
请编写适当事件过程，程序运行后，单击“放大”按钮，则把图像框的高度、宽度均增加600，同时图像也随之自动放大。
程序运行后，窗体界面如图所示。
10、在窗体上建立一个名称为text1的文本框，然后建立两个主菜单，标题分别为“国家制度”和“帮助”，名称分别为vbmenu 和vbhelp ，其中“国家制度”菜单包括“君主制”、“民主制”、“混合制”三个子菜单，名称分别为vbmenu1、vbmenu2、vbmenu3。
要求程序运行后，如果在“国家制度”的下拉菜单中选择“君主制”，则在文本框内显示“伊拉克、英国”；如选择“民主制”则在文本框内显示“澳大利亚、加拿大”；如选择“混合制”，则在文本框内显示“芬兰、丹麦”（要求：不使用任何变量，直接显示字符串）。
程序运行时，选择“民性别 身份 文本框中显示的内容 男 学生 我是男学生 男 教师 我是男教师 女学生 我是女学生 女教师我是女教师主制”的效果如图。
三、综合应用题1、在窗体form1上有一个文本框，还有一命令按钮，名称为Cmd1，标题“计算”，如图所示。
并有一个函数isprime可以在程序中直接调用，其功能是判断参数a是否素数，如是，则返回true，否则返回false。
请编写适当的事件过程，使得在运行时，单击“确定”按钮，则找出小于3000的最大素数，并显示在text1中。
Private Function isprime(a As Integer) As BooleanDim flag As Booleanflag = Trueb% = 2Do While b% <= Int(a / 2) And flagIf Int(a / b%) = a / b% Thenflag = FalseElseb% = b% + 1End IfLoopisprime = flagEnd Function2、编写一程序，显示出所有的水仙花数。
所谓水仙花数，是指一个3位数，其各位数字立方和等于该数本身。
例如，153是水仙花数，因为153=13+53+333、在窗体form1上画两个命令按钮，名称分别为Cmd1和Cmd2，标题为“添加”和“清除”。