全国计算机等级考试二级VB上机试题及答案(十一)
全国计算机等级考试二级VB上机试题及答案(十一)基本操作（2小题，每题15分，共30分）****************************************************************请根据以下各小题的要求设计VB应用程序（包括界面和代码）。
请根据以下各个小题的要求设计Visual Basic应用程序（包括界面和代码）。
（1）在名称为Form1的窗体上画一个列表框，其名称为List1，通过属性窗口向列表框中输入9个项目，分别为10、20、30、40、50、60、70、80、90；画一个文本框，其名称为Hscroll，Min属性和Max分别为0和100，如图所示，编写适当的事件过程。
程序运行后，如果单击列表框中的某个项目内容，并把滚动条的滚动框移动到相应的位置，如图所示。
要求：不得使用任何变量。
（2）在名称为Form1的窗体中画一个图像框，名称为Image1，其高、宽分别为1800、4500，通过属性窗口把考生文件夹下的图像文件smile.bmp装入图像框；再画一个命令按钮，名称为Cmd1，标题为"放大"。
请编写适当事件过程，程序运行后，单击"放大"按钮，则把图像框的高度、宽度均增加100，同时图像也随之自动放大。
注意：程序中不得使用任何变量。
程序运行时的界面如图所示。
****************************************************************参考答案与分析（1）【解析】滚动条的属性设置：Min--最大值属性。
默认值为32767；Max--最小值属性，默认值为0；Value--返回或设置滚动条的当前位置的值，返回直介于Max 和Man属性之间的值，包括这两个值。
要实现滚动条的返回值与List的设置值同步变化，在两者之间建立等式关系即可。
而Text属性对应的变量类型为字符串，所以这里用了一个转化函数Val（）来实现。
Val(S)函数将字符串转化为数值。
与之对应的将数值转化为字符串的函数Str(N)。
【答案】第一步：启动VB，新建一个工程文件。
第二步：在窗体上画一个文本框，文本框的Name属性为Text1，Text属性空，再在窗体上画一个水平滚动条Max为100，Min为0，Name为HScroll1，再画一个列表框List1，在List属性中输入"10、20、30、40、50、60、70、80、90"。
第三步：编写程序代码：1 Private Sub List1_Click()2 Text1.Text = List1.Text3 HScroll1.Value = Val(List1.Text)4 End Sub第四步：调试并运行程序，运行正确后按要求保存。
（2）【解析】本题主要考查了图像框的Stretch属性以及控制其大小的Height、Width属性。
Height、Width属性与其它控件类似，设置相应的值即可动态的改变图像框的大小，例如题目要求单击"放大"按钮要使得图像框的宽度和高度均增加100，故在Cmd1 的Click事件中改变Image的Height和Width，在原先的基础上加上100。
另外，题目中要求固定图片框的大小，即不能由于图片的大小而改变图片框的大小，而且改变图像框的大小后，其中加载的图片也要自动改变大小，所以必须将Image的Stretch属性设置为True。
【答案】第一步：启动VB，新建一个工程文件。
第二步：在窗体中画一个图像框，名称为Image1，设置Height属性1800，Width属性1500，Stretch 属性为True，在Picture属性中装入文件夹下的图像文件smile.bmp，再画一个命令按钮，Name属性为Cmd1，Caption属性为"放大"。
第三步：编辑代码：1 Private Sub Cmd1_Click()2 Image1.Height = Image1.Height + 1003 Image1.Width = Image1.Width + 1004 End Sub第四步：调试并运行程序，运行正确后按要求保存。
简单操作（2小题，每题20分，共40分）****************************************************************请根据以下各小题的要求设计VB应用程序（包括界面和代码）。
（1）在考生文件夹下有一个工程文件stj3.vbp，及其窗体文件stj3.frm，程序运行时，如果用鼠标左键按住窗体，并在其上移动，则窗体上显示"您按下了鼠标的左键"；如果用鼠标的右键按住窗体，并在其上移动，则显示"您按下了鼠标的右键"。
程序运行时的窗体界面如图所示。
要求：题目中所给的程序不完整，请读懂程序后将其补充完整，以原文件名保存。
试题源程序：1 Private Sub Form_MouseMove(Button As Integer, Shift AsInteger, X As Single, Y As Single)2 'If Button = ? Then Print "您按下了鼠标的左键"3 'If Button = ? Then Print "您按下了鼠标的右键"4 End Sub（2）在考生文件夹下有一个工程文件stj4.vbp，及其窗体文件stj4.frm，窗体上有一个标签和一个文本框，控件及其属性均已设置完毕，现使用KeyPress事件编写一个口令程序，程序运行后，在文本框中输入口令，如果正确，则显示相应的信息，单击"确定"按钮后，将显示一行信息；如果口令不正确，则要求重新输入。
3次输入的口令都不正确，则停止输入，并结束程序。
程序运行的画面如图所示。
要求：题目中所给的程序不完整，请读懂程序后将其补充完整，以原文件名保存。
试题源程序：1 Private Sub Form_Load()2 Text1.Text = ""3 Text1.FontSize = 104 Label1.FontSize = 125 Label1.FontBold = True6 Label1.Font0 = "隶书"7 Label1.Caption = "请输入口令..."8 End Sub9 Private Sub Text1_KeyPress(KeyAscii As Integer)10 Static PWord As String11 Static Counter As Integer12 Static Numberftries As Integer13 Numberftries = Numberftries + 114 'If ? Then End15 Counter = Counter + 116 'PWord = PWord + ?17 KeyAscii = 018 Text1.Text = String$(Counter, "*")19 If LCase$(PWord) = "abcd" Then20 Text1.Text = ""21 PWord = 022 MsgBox "口令正确，继续..."23 Counter = 024 Print "continue..."25 'ElseIf ?Then26 Counter = 027 PWord = ""28 Text1.Text = ""29 MsgBox "口令不对，请重新输入"30 End If31 End Sub****************************************************************参考答案与分析（1）【解析】本题主要考查了鼠标左键以及右键的使用，即鼠标的Button属性。
Button为1时，表示鼠标的左键，为2时，表示鼠标的右键，为4时，表示鼠标的中键，故在第一个?处填入1，表示按下鼠标的左键，第二个?处填入2，表示鼠标的右键。
【答案】（1）启动VB，打开考生文件夹下的工程文件stj2.vbp。
（2）双击窗体的任何位置，进入代码编辑窗口，补充程序如下：第一个?处填入1第二个?处填入2（3）运行程序，确定无误后以原文件名保存。
（2）【解析】本题主要考查了文本框的KeyPress事件。
每按下键盘的一个键就触发一次KeyPress事件。
在本题中用文本框的KeyPress事件来测试输入口令是否正确。
在该过程中，定义了3个静态变量，其中Numberftries变量用来对输入的口令字符计数。
每按一次键，就触发一次KeyPress事件，Numberftries变量加1，当该值达到12时结束程序，因此第一个问号处应填入Numberftries = 12。
口令由四个字符组成，既由每次输入的字符连接起来组成，因此第二个问号处应填入Chr$(KeyAscii)，用Counter来表示输入口令长度，每输入四个为一个完整的口令，因此第三个问号处应填入Counter =4。
【答案】（1）启动VB，打开考生文件夹下的工程文件stj4.vbp。
（2）双击窗体的任何位置，进入代码编辑窗口，填写代码：第一个?处填入：Numberftries = 12第二个?处填入：Chr$(KeyAscii)第三个?处填入：Counter = 4（3）填写完毕，调试并运行，运行无误后以原文件名保存。
综合应用（1小题，共30分）****************************************************************请根据以下各小题的要求设计VB应用程序（包括界面和代码）。
在考生文件夹下有工程文件djks043.vbp及窗体文件djks043.frm，该程序是不完整的，请在有？的地方填入正确内容，然后删除？及所有注释符（′），但不能修改其他部分。
存盘时不得改变文件名和文件夹。
本题描述如下：在窗体上有两个标签、两个文本框、一个框架、三个单选框以及两个控制按钮。
标签的名称分别为Label1与Label2，标题分别为"原文本"、"加密文本"；文本框的名称分别为Text1与Text2,Text属性均为空；两个控制按钮的名称分别为Command1与Command2，标题分别为"加密"与"读入"；单选框的名称统一为Option1，标题分别为2、4、6；框架名称为Frame1，标题为"加密类型"。
全国计算机二级《VB》练习题及答案
全国计算机二级《VB》练习题及答案全国计算机二级《VB》练习题及答案9月计算机等级考试将于9月23日-26日举行，目前处于紧张的备考阶段，以下是店铺搜索整理的一份全国计算机二级《VB》练习题及答案，供参考练习，预祝考生们考出自己理想的成绩!想了解更多相关信息请持续关注我们店铺!1.双击窗体中的对象后，VB将显示的窗口是(C)(单)A.工具箱B.项目(工程)窗口C.代码窗口D.属性窗口2.下述选项中，VB的程序设计方法是(B)(单)A.面向对象、顺序驱动B.面向对象、事件驱动C.面向过程、事件驱动D.面向过程、顺序驱动3.在VB中，要将一个窗体装载到内存进行变量初始化等预处理，但没有显示该窗体，应使用的方法或语句是(C)(单)A.ShowB.UnloadC.LoadD.Hide4.文本框的默认属性是(B)(单)A.CaptionB.TextD.Top5.标签默认属性是(A)(单)A.CaptionD.Top6.执行以下程序段：a$="abbacddcba"For I=6 To 2 Step -2X=Mid(a,I,I)Y=Left(a,I)z=Right(a,I)z=Ucase(X&Y&z)Next IPrint z输出结果为(B)(单)A.ABAB.BBABBAC.ABBABAD.AABAAB7.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1,2,3,4,5)Sum=0For I=1 To 5Sum = sum+a(I)Next Ix=Sum/5For I =1 To 5If a(I)>x Then Print a(I);End Sub程序运行后，单击命令按钮，在窗体上显示的内容是(D)(单)A.1 2B.1 2 3C.3 4 5D.4 58.假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。
计算机二级VB上机试题及答案
计算机二级VB上机试题及答案计算机二级VB上机试题及答案在各领域中，我们最少不了的就是试题了，试题可以帮助主办方了解考生某方面的知识或技能状况。
什么样的试题才能有效帮助到我们呢？下面是店铺帮大家整理的计算机二级VB上机试题及答案，希望对大家有所帮助。
（1）在名为Form1的窗体上绘制一个名为Cmd1的命令按钮，其标题为“移动按钮”。
编写适当的事件过程，使得程序运行时，每单击命令按钮一次，该按钮向右移动50，注意：程序中不得使用变量，事件过程中只能写一条语句；文件必须存放在考生文件夹中，工程文件名为vbsj1.vbp，窗体文件名为vbsj1.frm。
（2）在Form1 的窗体上绘制一个名为Lab1 的标签框，设置相关属性，使标签有框架。
然后建立一个名为 mnuOp 的主菜单，其标题为“操作”，该菜单有两个名称分为mnuOpDis 和mnuOpHide 的菜单项，其标题分别为“显示”和“隐藏”。
编写适当的事件过程，程序运行后，若单击“操作”菜单中的.“显示”命令，则在标签框中显示“二级Visual Basic”；如果单击“隐藏”命令，则隐藏标签框。
注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为vbsj2.vbp，窗体文件名为 vbsj2.frm。
第1小题【审题分析】要实现本题要求的功能，只需在命令按钮的单击事件过程中，设置命令按钮的 Left 属性值增加50。
【操作步骤】步骤1：新建一个"标准EXE"工程，在窗体中画一个名Cmd1 命令按钮，并设置其Caption 属性值为"移动按钮"。
步骤2：打开代码编辑窗口，编写命令按钮的 Click 事件过程。
参考代码：Private Sub Cmd1_Click（）Cmd1.Left = Cmd1.Left + 50End Sub步骤3：按要求将文件保存至考生文件夹中。
第2小题【审题分析】本题需用菜单设计器建立菜单，并编写"显示"和"隐藏"菜单项的单击事件过程。
计算机二级考试VB练习题及答案
计算机二级考试VB练习题及答案计算机二级考试VB练习题及答案为了使广大考生在备战计算机等级考试时，更快的掌握相应知识点，下面是店铺搜索整理的计算机二级考试VB练习题及答案，供参考练习，预祝考生们考出自己理想的成绩!计算机二级考试VB练习题及答案1.以下程序是求最大公约数和最小公倍数的程序，在【】处填写合适的关系运算符。
Private Sub Form_Click( )Dim m1, n1, m, n, r As Integern1 = InputBox("输入自然数n", "输入数")m1 = InputBox("输入自然数m", "输入数")n = n1m = m1If m<n p="" then<="">t = m: m = n: n = tEnd Ifr = m Mod nDo While r 【<>】 0m = nn = rr = m Mod nLoopPrint "最大公约数=", nPrint "最小公倍数= ", m1 * n1 / nEnd Sub2.下面是求100以内素数的程序。
Private Sub Command1_Click( )Dim i As Integer, m As Integer, tag As BooleanFor m = 2 To 100tag = TrueFor i = 2 To m - 1If m Mod 【i】 = 0 Then tag = FalseNext iIf tag Then Print mNext mEnd Sub3.下面是求100以内素数的程序，下面说法正确的是(A)(单)Private Sub Command1_Click( )Dim i As Integer, m As Integer, tag As BooleanFor m = 2 To 100tag = TrueFor i = 2 To m - 1If m Mod i = 0 Then tag = FalseNext iIf tag=true Then Print mNext mEnd SubA.tag为true时，表示m是素数B.tag为false时，表示m是素数C.语句m Mod i = 0，说明m是素数D.以上说法都不正确4.百元买百鸡问题：假定小鸡每只5角,公鸡每只2元，母鸡每只3元。
国家二级VB机试(上机操作)模拟试卷142(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷142(题后含答案及解析) 题型有：1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题1．在名称为Form1、标题为“欢迎”的窗体上画1个名称为Label1的标签，其标题内容为“欢迎使用本系统”，标题文字字体和字号分别为“宋体”、“三号”，标签大小能根据标题内容自动调整，效果如图所示。
程序执行时，窗体的最大化按钮不可用(如图所示)，请设置相应属性。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。
正确答案：[操作步骤]步骤1：新建一个窗体，在属性窗口中设置窗体的属性，按照表4．3所示在属性窗口中设置相应属性，其运行效果如图4．3所示。
步骤2：在窗体上添加一个标签控件，在属性窗口中设置标签的属性，按照表4．4所示在属性窗口中设置相应属性，其运行效果如图4．4所示。
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
2．在名称为Form1的窗体上，画1个名称为Label1的标签，其标题为“横坐标X”，且能根据标题内容自动调整标签的大小；再画1个名称为Text1的文本框，其中的文字显示为空白；再画1个名称为Picture1的图片框，大小适中即可。
要求：编写适当的事件过程，使得程序运行时，如果鼠标在图片框中移动，则能在文本框Text1中显示鼠标在图片框中的当前位置的横坐标，运行情况如图所示。
注意：要求程序中不得使用变量，事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：[操作步骤]步骤1：新建一个窗体，在窗体上添加一个标签控件，在属性窗口中设置标签的属性，按照表4．5所示在属性窗口中设置相应属性，其运行效果如图4．5所示。
步骤2：在窗体上添加一个文本框控件，在属性窗口中设置文本框的属性，按照表4．6所示在属性窗口中设置相应属性，其运行效果如图4．6所示。
计算机vb二级考试试题及答案
计算机vb二级考试试题及答案一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明一个变量？A. DimB. SubC. FunctionD. Class答案：A2. VB中，哪个函数用于计算一个数的绝对值？A. AbsB. SgnC. RoundD. Int答案：A3. 若变量x的值为5，y的值为10，以下哪个表达式的值是15？A. x + yB. x * yC. x / yD. x - y答案：A4. 在VB中，以下哪个控件用于显示文本，并且可以被用户编辑？A. LabelC. ComboBoxD. CheckBox答案：B5. VB中，以下哪个事件是当窗体被关闭时触发的？A. Form_LoadB. Form_ClickC. Form_ClosingD. Form_Closed答案：C6. 在VB中，以下哪个关键字用于创建一个子程序？A. FunctionB. SubC. ClassD. Property答案：B7. 若变量a的值为3，b的值为2，以下哪个表达式的值是1？A. a - bB. a * bC. a / bD. a Mod b答案：A8. VB中，以下哪个控件用于显示下拉列表？B. ComboBoxC. CheckBoxD. RadioButton答案：B9. 在VB中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. Text答案：A10. VB中，以下哪个函数用于将字符串转换为大写？A. UCaseB. LCaseC. StrCompD. Trim答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量i的语句是________。
答案：Dim i As Integer2. VB中，使用________函数可以将字符串"Hello World"转换为小写。
答案：LCase3. 当用户点击一个按钮时，触发的事件是________。
计算机二级考试VB考试题及答案
计算机二级考试VB考试题及答案计算机二级考试VB考试题及答案为了使广大考生在备战计算机等级考试时，更快的掌握相应知识点，下面是店铺搜索整理的计算机二级考试VB考试题及答案，供参考练习，预祝考生们考出自己理想的成绩!计算机二级考试VB考试题及答案1、窗体中有一个名称为txtSpeed的文本框，一个名称为hsbSpeed的滚动条。
以下程序：Private Sub hsbSpeed_Change( )txtSpeeD.Text = hsbSpeeD.ValueEnd Sub当单击滚动条hsbSpeed右端的箭头时，以下说法不正确的是(B) (单)A.此时会触发change事件B.此时不会触发change事件C.在文本框中显示了滚动条滑块所在位置的值D.此时不会触发scroll事件2.利用窗体中的滚动条HScroll1改变窗体的背景色，可以这样编写代码：Private Sub HScroll1_Change( )R= HScroll1.Valueform1.BackColor = RGB(R，int(Rnd*256)，int(Rnd*256))End Sub以下说法不正确的是(C) (单)A.窗体的背景色是一个随机的颜色B.RGB函数取得到的颜色有256*256*256种C.表达式int(Rnd*256)取得随机数的范围为0-256之间的整数D.表达式int(Rnd*256)取得随机数的范围为0-255之间的整数3.窗体中有一个名称为Slider1的可选择性刻度滑块控件，一个名称为text1的文本框，如下程序：Private Sub Slider1_change( )Text1.FontSize =【Slider1.value】End Sub当拖动滑块时，以上程序实现用Slider控件设置文本框中的字体大小的功能。
4.窗体中有一个名称为Slider1的可选择性刻度滑块控件，一个名称为text1的文本框，如下程序：Private Sub Slider1_change( )Text1.【Fontsize】 = slider1.valueEnd Sub当拖动滑块时，以上程序实现用Slider控件设置文本框中的字体大小的功能。
全国计算机等级测验二级VB上机试题及答案(十一)
全国计算机等级测验二级VB上机试题及答案(十一)————————————————————————————————作者：————————————————————————————————日期：全国计算机等级考试二级VB上机试题及答案(十一)基本操作（2小题，每题15分，共30分）****************************************************************请根据以下各小题的要求设计VB应用程序（包括界面和代码）。
请根据以下各个小题的要求设计Visual Basic应用程序（包括界面和代码）。
（1）在名称为Form1的窗体上画一个列表框，其名称为List1，通过属性窗口向列表框中输入9个项目，分别为10、20、30、40、50、60、70、80、90；画一个文本框，其名称为Hscroll，Min属性和Max分别为0和100，如图所示，编写适当的事件过程。
程序运行后，如果单击列表框中的某个项目内容，并把滚动条的滚动框移动到相应的位置，如图所示。
要求：不得使用任何变量。
（2）在名称为Form1的窗体中画一个图像框，名称为Image1，其高、宽分别为1800、4500，通过属性窗口把考生文件夹下的图像文件smile.bmp装入图像框；再画一个命令按钮，名称为Cmd1，标题为"放大"。
请编写适当事件过程，程序运行后，单击"放大"按钮，则把图像框的高度、宽度均增加100，同时图像也随之自动放大。
注意：程序中不得使用任何变量。
程序运行时的界面如图所示。
****************************************************************参考答案与分析（1）【解析】滚动条的属性设置：Min--最大值属性。
默认值为32767；Max--最小值属性，默认值为0；Value--返回或设置滚动条的当前位置的值，返回直介于Max 和Man 属性之间的值，包括这两个值。
计算机二级考试VB真题及答案
计算机二级考试VB真题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. StringC. DoubleD. All of the above答案：D2. VB中，以下哪个函数用于计算一个数的平方？A. SqrB. PowC. AbsD. Round答案：B3. 在VB中，以下哪个选项是正确的事件处理程序的写法？A. Private Sub Form_Click()B. Public Sub Form_Click()C. Private Function Form_Click()D. Public Function Form_Click()答案：A4. VB中，以下哪个控件用于显示文本信息？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A5. 在VB中，以下哪个选项是正确的循环结构？A. For EachB. Do WhileC. Both A and BD. None of the above答案：C6. VB中，以下哪个函数用于获取当前日期？A. DateB. NowC. TimeD. Year答案：A7. 在VB中，以下哪个选项是正确的数组声明方式？A. Dim arr(10)B. Dim arr(0 To 10)C. Both A and BD. None of the above答案：C8. VB中，以下哪个属性用于设置控件是否可用？A. EnabledB. VisibleC. CaptionD. BackColor答案：A9. 在VB中，以下哪个选项是正确的条件语句？A. If...Then...ElseB. Select CaseC. Both A and BD. None of the above答案：C10. VB中，以下哪个函数用于将字符串转换为数字？A. StrB. ValC. CIntD. CDbl答案：B二、填空题（每题2分，共20分）1. VB中的窗体对象默认名称是________。
计算机二级考试VB上机题级答案
一、盘上有一名为“36test11.vbp”的文件。
其功能为打印如下图所示的金字塔。
请改正该程序并调试。
Private Sub Command1_Click()For i = 1 To 9Print Space(16 - i)For j = 1 To iPrint Format(j, "0");Next jIf i > 1 ThenFor j = i - 1 To 1 Step -1Print Format(j, "0")Next jEnd IfPrintNext iEnd SubPrivate Sub Form_Load()Command1.Caption = "开始"End Sub二、1、建立一个窗体，单机“生成随机数”按钮，生成n个【6,30】闭区间内的随机偶数存放于列表框list1中。
其中，n的值也是一个【10,20】之间的一个随机数。
2、单击“查找完数”按钮，找出list1中所有完数并显示在picture1中。
如果没有完数，则显示“这批随机数中无完数”。
Private sub command1-click()RandomizeDim i as inter,n as integerN = int(rnd*11)+10List1.clearFor i = 1 to nList1.additem int(13*rnd)*2+6Next iEnd subPrivate sub command2-click()Dim i as integer,j as integerDim n as integer,x as integerDim s as integer,st as integerPicture1.clsf = 0N =list1.listcountFor i = 0 to n-1S=0N = list1.listcountFor i = 0 to n-1S= 0St =list1.list(i) +”=’X= val(list1.list(i))For j = 1 to x\2If x mod j = 0 thenS= s+jSt =st &j & “+”End ifNext jIf s = x thenF= 1Picture.print left(st.len(st)-1)End ifNext iIf f=0 then picture1.print”这批随机数中无完数”End sub一、在磁盘上有一名为“36test21.vbp”的文件。
国家二级VB机试(上机操作)模拟试卷100(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷100(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画一个标签，名称为L1，标题为“业余爱好”，再画一个名称为Chl的复选框数组，含三．个复选框，它们的Index属性分别为0、1、2，标题依次为“体育”、“音乐”、“美术”，请设置复选框的属性，使其初始状态见表3一1。
运行后的窗体如图3-11所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。
(2)在名称为Forml的窗体上画一个文本框，名称为Text1；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Show和Hide，标题分别为“显示”、“隐藏”，请编写适当的事件过程，使得在运行时，单击“隐藏”菜单项，则文本框消失；单击“显示”菜单项，则文本框显示出来。
运行后的窗体如图3-12所示。
要求程序中不得使用变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：第1小题本题只需按要求画出控件数组，并设置其Value属性。
【操作步骤】步骤1：新建一个“标准EXE”工程。
步骤2：在窗体Forml中加入一个标签和一个复选框，并用“复制”和“粘贴”的方法，生成包含三个元素的复选框数组。
步骤3：分别设置窗体和复选框数组中各元素的相关属性，其属性及值如表4．5所示。
步骤4：按要求将文件保存至考生文件夹中。
第2小题本题需用菜单设计器建立菜单，并编写“显示”和“隐藏”菜单项的单击事件过程控制文本框的visible属性变化。
【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体Forml中画一个文本框，在属性设置窗口中将其Name属性值设置为Text1。