全国计算机等级考试二级VB上机试题及答案(五)
全国计算机等级考试二级VB上机试题及答案(四)基本操作（2小题，每题15分，共30分）****************************************************************请根据以下各小题的要求设计VB应用程序（包括界面和代码）。
请根据以下各个小题的要求设计Visual Basic应用程序（包括界面和代码）。
（1）在名为Form1的窗体上画一个框架，名称为Frm1，标题为"框架"，高度为2000，宽度为3000；再在框架中画一个文本框，名称为Text1，高度为300，宽度为1000，文本框的初始内容设置为"文本框"。
程序运行时的界面如图所示。
（2）在名称为Form1的窗体上，画一个框架，两个单选按钮，一个命令按钮。
框架的名称为Frm1，标题为"地点"。
两个单选按钮在Frm1框架中，名称为Opt1，Opt2，标题分别为"图书馆"，"教室"。
命令按钮的名称为Cmd1，标题为"屏蔽"。
编写适当的事件过程，当程序运行时，如果单击Cmd1按钮，框架就会被屏蔽。
程序运行时的界面如图所示。
****************************************************************参考答案与分析（1）【解析】在窗体中画一个框架，则只需要从工具箱中拖出框架控件放在窗体上即可，而要在框架上画文本框，则是从工具箱中将文本框拖放到框架中。
所以，考生必须注意的是，应该先在窗体上画框架，然后在框架中画文本框。
【答案】第一步：启动VB，新建一个工程文件。
第二步：单击工具箱中框架控件，在窗体上画一个框架，将其Name属性设为Frm1；Caption属性设为"框架"，Height为2000，Width为3000；再在框架中画一个文本框，Name属性为Text1，Height为300，Width为1000，文本框的Text属性设置为"文本框"。
第三步：调试并运行程序。
程序设计完成经调试无误后进行存盘。
执行"文件"菜单中的"保存工程"命令，打开"文件另存为"对话框，窗体文件名为"Stj1.form"，单击保存按钮。
然后在紧接着出现的"工程另存为"对话框中选择工程文件名为"Stj1.vbp"，单击保存按钮。
（2）【解析】要将框架屏蔽，只要将其Enabled属性设置为False即可。
Enabled为True时保证框架及其内的对象使活动的，为False时其标题会变黑，框架中的所有对象均被屏蔽（禁用）。
【答案】第一步：启动VB，新建一个工程文件。
第二步：单击工具箱中的框架控件，在窗体上画一个框架，将其Name属性设为Frm1，Caption属性设为"地点"，再在窗体上两个单选按钮，将其Name属性设为Opt1、Opt2，Caption属性分别为"图书馆"、"教室"，再画一个命令按钮Name 属性设为Cmd1，Caption属性设为"屏蔽"。
第三步：编写程序代码：1 Private Sub Cmd1_Click()2 Frm1.Enabled = False3 End Sub第四步：调试并运行程序。
程序设计完成经调试无误后进行存盘。
以Stj2.vbp 和sjt2.frm进行保存。
简单操作（2小题，每题20分，共40分）****************************************************************请根据以下各小题的要求设计VB应用程序（包括界面和代码）。
（1）在考生目录下有一个工程文件stj3.vbp，窗体上有一个圆和一条直线（直线名称为Line1）构成一个钟表的图案；有两个命令按钮，名称分别为Command1和Command2，标题分别为"开始"和"停止"；还有一个名为Timer1的计时器。
程序运行时，钟表指针不动，单击"开始"按钮，则钟表上的指针（即Line1）开始顺时针旋转（每秒转6?，一分钟一圈）；单击"停止"按钮，则指针停止旋转。
运行时的窗体如图所示。
请设置计时器的适当属性，使得每秒激活计时器的Timer事件一次；并编写两个命令按钮的Click事件过程。
文件中已经给出了所有控件和部分程序，不得修改已有的程序和其他控件的属性；编写的事件过程中不得使用变量，且只能写一条语句。
最后把修改后的文件按原文件名保存。
试题源程序：1 Dim lenth As Integer, q As Integer2 Const PI = 3.141593 Private Sub Form_Load()4 lenth = Line1.Y2 - Line1.Y15 q = 906 End Sub7 Private Sub Timer1_Timer()8 q = q - 69 Line1.Y1 = Line1.Y2 - lenth * Sin(q * PI / 180)10 Line1.X1 = Line1.X2 + lenth * Cos(q * PI / 180)11 End Sub（2）在考生文件夹下有一个工程文件stj4.vbp，窗体上已经画出所有的控件。
程序的作用是构成一个简单的闹钟。
刚运行时，不计时，选择一个单选按钮后，再单击"计时"按钮，则开始计时，并根据所选的单选按钮决定是每秒显示一次，还是每10秒显示一次。
Text2用于显示秒，如图所示。
窗体文件中已经给出了程序，但不完整，请去掉程序中的注释符，把程序中的？改为正确的内容。
注意：不得修改已经给出的程序。
最后把修改后的文件按原文件名保存。
试题源程序：1 Dim num2 Private Sub Command1_Click()3 Timer1.Enabled = True4 End Sub5 Private Sub Timer1_Timer()6 ' num = ?7 If num < 60 Then8 If Option1.Value = True Theni. Text2.Text = num9 Elsei. If (num / 10 = CInt(Int(num / 10))) Then10 ' Text2.Text = Text2.Text + ?i. End If11 End If12 Else13 Text2.Text = 014 num = 015 ' Text1.Text = Text1.Text + ?16 End If17 End Sub****************************************************************参考答案与分析（1）【解析】（1）本题要求用开始和结束按钮来控制定时器的开始和结束，所以编写Command1_Click()和Command2_Click()函数，用Enabled属性来控制定时器的工作和结束。
（2）Timer 控件响应时间的流逝。
每个 Timer 控件都有 Interval 属性，指定定时器事件之间的毫秒数。
除非禁止此属性，否则定时器在大致相等的时间间隔不断接受事件（称作定时器事件会更贴切）。
（3）Line 控件的X1、Y1、X2、Y2 属性，返回或设置 Line 控件的起始点 (X1, Y1) 和终止点 (X2, Y2) 的坐标。
水平坐标是 X1 和 X2；垂直坐标是 Y1 和 Y2。
【答案】（1）启动VB程序，打开考生文件夹下的工程文件stj3.vbp。
（2）双击窗体中的任何位置，进入代码编辑窗口，完善程序如下：1 Dim lenth As Integer, q As Integer2 Const PI = 3.141593 Private Sub Command1_Click()4 Timer1.Enabled = True5 End Sub6 Private Sub Command2_Click()7 Timer1.Enabled = False8 End Sub9 Private Sub Form_Load()10 lenth = Line1.Y2 - Line1.Y111 q = 9012 End Sub13 Private Sub Timer1_Timer()14 q = q - 615 Line1.Y1 = Line1.Y2 - lenth * Sin(q * PI / 180)16 Line1.X1 = Line1.X2 + lenth * Cos(q * PI / 180)17 End Sub（3）单击启动键运行成功。
（4）按考试要求将文件保存在考生文件夹下。
（2）【解析】本题要求在文本框中显示时间，用单选按钮来决定是每秒显示还是每10秒显示一次。
在Timer1_Timer()函数中，当选中每秒显示时，如果num<60 时有Text2.Text = num 所以num = num + 1 。
如果选中每10秒显示一次，则Text2.Text = Text2.Text + 10。
int（number）函数：返回数字的整数部分。
CInt（number）函数用于把其他数据类型转换到 Integer 子类型。
If (num / 10 = CInt(Int(num / 10))) Then表示每10秒更新一次。
【答案】1）启动VB程序，打开考生文件夹下的工程文件stj4.vbp。
（2）双击窗体中的任何位置，进入代码编辑窗口，完善程序如下：1 Dim num2 Private Sub Command1_Click()3 Timer1.Enabled = True4 End Sub5 Private Sub Timer1_Timer()6 num = num + 17 If num < 60 Then8 If Option1.Value = True Then9 Text2.Text = num10 Else11 If (num / 10 = CInt(Int(num / 10))) Then12 Text2.Text = Text2.Text + 1013 End If14 End If15 Else16 Text2.Text = 017 num = 018 Text1.Text = Text1.Text + 119 End If20 End Sub（3）单击启动键运行成功。
全国计算机二级《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语言程序设计考试题及答案1.在窗体上画一个名称为Text1的文本框，一个名称为Command1的命令按钮，然后编写如下事件过程和通用过程：PrivateSubCommand1_Click()n=Val(Text1.Text)Ifn2=n/2Thenf=f1(n)Elsef=f2(n)EndIfPrintf;nEndSubPublicFunctionf1(ByRefx)x=x*xf1=x+xEndFunctionPublicFunctionf2(ByValx)x=x*xf2=x+x+xEndFunction程序运行后，在文本框中输入3，然后单击命令按钮，窗体上显示的是(D)(单)A.7236B.10836C.726D.2732.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()c="1234"Fori=1To4c1=Trim(Str())Printc1NextiEndSub程序运行后，单击命令按钮，要求在窗体上显示如下内容1121231234则在下划线处应填入的内容为(B)(单)A.Right(c1,i)B.Left(c1,i)C.Mid(c1,i,1)D.Mid(c1,i,i)3.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：PrivateSubCommand1_Click()n=Val(Text1.Text)Fori=2TonForj=2Tosqr(i)IfiModj=0ThenExitForNextjIfj>Sqr(i)ThenPrintiNextiEndSub该事件过程的功能是(C)(单)A.输出n以内的奇数B.输出n以内的'偶数C.输出n以内的素数D.输出n以内能被j整除的数4.在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：PrivateFunctionf(mAsInteger)IfmMod2=0Thenf=mElsef=1EndIfEndFunctionPrivateSubCommand1_Click()DimiAsIntegers=0Fori=1To5s=s+f(i)NextPrintsEndSub程序运行后，单击命令按钮，在窗体上显示的是(C)(单)A.11B.10C.9D.85.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()Dimarray1(10,10)AsIntegerDimiAsInteger,jAsIntegerFori=1To3Forj=2To4array1(i,j)=i+jNextjNextiText1.Text=array1(2,3)+array1(3,4)EndSub程序运行后，单击命令按钮，在文本框中显示的值是(D)(单)A.15B.14C.13D.126.VisualBasic应用程序中标准模块文件的扩展名是【BAS或.BAS】(注意不要写点)。
计算机二级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机试(上机操作)模拟试卷5(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷5(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
在标题为”文本框”、名称为Forml的窗体上画一个名称为Textl的文本框，无初始内容，其高、宽分别为2000、1800，可显示多行，有水平滚动条，并通过属性窗口把文本框的字体样式设置为”斜体”(如图2．49所示)。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。
正确答案：步骤1：新建一个”标准。
EXE”工程，如表3-26在窗体中画出控件并设置其相关属性。
步骤2：按要求将文件保存至考生文件夹中。
2．在名称为Forml的窗体上画一个名称为Listl的列表框，通过属性窗口输入4个列表项：”数学”、”物理”、”化学”、”语文”，如图2-50所示。
请编写适当的事件过程，使得在装入窗体时，把最后一个列表项自动改为”英语”；单击窗体时，则删除最后一个列表项。
注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
正确答案：步骤1：新建一个”标准EXE”工程，在窗体Forml中加入一个列表框，在属性设置窗口中将其Name属性设置为Listl，在其List属性中添加四个项目，依次为”数学”、”物理”、”化学”和”语文”。
注意：每输入完一项后按＜Ctrl+Enter＞键换行再输入下一项。
步骤2：打开代码编辑窗口，编写相应的事件过程：参考代码：Private Sub Form_Click( )Listl．RemoveItem Listl．ListCount_1Enld SubPrivate Sub Form_Load( )Listl．List(Listl．ListCount-1)=“英语”End Sub步骤3：按要求将文件保存至考生文件夹中。
计算机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上机试题50套解析
、第 50 套 上机考试试题 一、基本操作题 （1）在名称为Form1的窗体上绘制一个文本框，名称为Txt1，字体为“宋体”，文本 框中的初始内容为“二级Visual Basic”；再绘制一个命令按钮，名称为Cmd1，标题为“改 变字体为楷体”。
请编写适当事件过程，使得在运行时，单击命令按钮，则把文本框中文 字的字体改为楷体，如图50-1所示。
图 50-1 注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 vbsj1.vbp ，窗体文件名为vbsj1.frm 。
（2）在名称为Form1的窗体上绘制一个名称为Cmd1的命令按钮，其标题为“移动”， 位于窗体的左上部。
编写适当的事件过程，使程序运行后，每单击一次窗体，都使得命令 按钮同时向右、向下移动100。
程序的运行情况如图50-2所示。
图 50-2注意：不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为vbsj2.vbp ，窗体文件名为vbsj2.frm 。
二、简单应用题（1）在名称为 Form1 的窗体中绘制一个名称为 Lab1 的标签，其标题为“0”，BorderStyle 属性为 1；再添加一个名称为 Tmr1 的计时器。
请设置适当的控件属性，并编写适当的事 件过程，使得在运行时，每隔 1 秒钟标签中的数字加 1。
程序运行时效果如图 50-3 所示。
注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为vbsj3.vbp ，窗体文件名为 vbsj3.frm 。
图 50-3 （2）在考生文件夹中有一个工程文件 vbsj4.vbp 及窗体文件 vbsj4.frm 。
在名称为 Form1 的窗体上有一个名称为 Cmd1 的命令按钮，其标题为“下一个”。
要求在窗体上建立一个 单选按钮数组 Opt1，含 4 个单选按钮，标题分别为“A”、“B”“C”和“D”，初始状态 下，“A”为选中状态。
程序运行效果如图 50-4 所示。
全国计算机 二级 VB上机操作题 题目答案及解析
85 （1）【考点分析】本题考点有：文本框的Name、Height、Width、Font、FontSize属性，窗体的Caption、MaxButton、MinButton属性。
【解题思路】根据题意添加控件并设置相应属性。
不显示窗体的最大化和最小化按钮只需将其MaxButton和MinButton属性设为False即可。
【操作步骤】步骤1：建立界面，添加控件并设置控件的属性。
程序中用到的控件及属性见表3.275。
步骤2：调试并运行程序，关闭程序后按题目要求存盘。
（2）【考点分析】本题考点有：图像框的Name、Picture、Stretch属性，命令按钮的Name、Caption属性。
【解题思路】图像框（Image）的Picture属性用于在设计阶段设置在图像框中显示的图片，它的Stretch（自动伸缩）属性用来设定载入其中的图片是否需要自动调整大小，以适应图像框的大小。
本题要在单击按钮时实现"向右移动"或"向下移动"的功能，应在程序中动态设置图像框的Left和Top属性。
【操作步骤】步骤1：建立界面，添加并设置控件的属性。
程序中用到的控件及属性见表3.276。
4 步骤2：编写程序代码。
参考答案Private Sub Command1_Click()Image1.Left = Image1.Left + 100End SubPrivate Sub Command2_Click()Image1.Top = Image1.Top + 100End Sub步骤3：调试并运行程序，关闭程序后按题目要求存盘。
（1）【考点分析】本题考点有：命令按钮的Caption属性和Click事件，直线控件的X1、X2、Y1、Y2属性，形状控件的Shape属性，Sin( )函数，Cos( )函数以及计时器的Enabled属性和Timer事件。
【解题思路】Sin( )函数和Cos( )函数分别返回变量的正弦和余弦值；通过X1、X2、Y1、Y2属性来设置直线的端点。
国家二级VB机试(上机操作)模拟试卷570(题后含答案及解析)
国家二级VB机试（上机操作）模拟试卷570(题后含答案及解析)题型有：1.jpg /> 程序运行后的窗体如图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名保存为sjt1．frm。
(2)在名称为Forml的窗体上添加一个名称为Text1的文本框；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个菜单项，名称分别为Show和Hide，标题分别为“显示”、“隐藏”，请编写适当的事件过程，使程序运行时，单击“隐藏”菜单项，文本框消失；单击“显示”菜单项，文本框重新出现，程序运行后的窗体如图所示。
要求程序中不得使用变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sjt2．frm。
正确答案：(1)【操作步骤】步骤1：建立界面，按照题目要求建立一个名称为L1，Caption属性为“业余爱好”的标签和1个名称为Ch1的复选框数组，包含3个复选框，并设置其相应属性，如图4．24所示。
设置其他控件相关属性，程序中用到的控件及属性见表4．24。
步骤2：调试并运行程序，关闭程序后按题目要求存盘。
(2)【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体中绘制一个文本框，在属性设置窗口中将其Name 属性值设置为Text1。
打开菜单编辑器，按表4．25设置建立菜单项。
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案Private Sub Hide_Click( ) Text1．Visible=False’当用户单击了”隐藏”菜单项时。
则Text1不可见End Sub Private Sub Show_Click( ) Text1．Visible=True’同理，Text1可见End Sub 步骤3：调试并运行程序，关闭程序后按题目要求存盘。
解析：(1)复选框有一个特殊属性就是Value属性，它的取值和用法与单选按钮有所差别。
计算机二级VB上机操作练习题及答案
计算机二级VB上机操作练习题及答案计算机二级VB上机操作练习题及答案Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言，下面店铺为为大家带来计算机二级VB上机操作练习题及答案，希望大家喜欢！一、基本操作题(1)在名称为Forml、标题为“球类项目”且没有最大化和最小化按钮的窗体上画1个名称为Combol的组合框。
组合框中的文本内容为空，表项内容有“乒乓球”、“羽毛球”和“网球”3项。
运行后的窗体如图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl.vbp，窗体文件名为sjtl.frm。
(2)在名称为Forml、标题为“转换”的窗体上，画1个名称为Shapel、边框宽度为3的形状。
再画两个标题分别为“椭圆”和“圆”的命令按钮。
如下图所示。
要求：编写适当的事件过程，使得单击“椭圆”按钮时，Shapel 的形状变换为椭圆;单击“圆”按钮时，Shapel的形状变换为圆。
程序中不得使用变量，每个事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjr2.vbp，窗体文件名为sjr2.frm。
二、简单应用题(1)考生文件夹中有工程文件sjt3.vbv。
窗体上显示有一个列表框和一个文本框，且列表框中已有若干列表项。
程序的功能是，程序运行时，当用户在列表框中单击并选中某个列表项时，该项的内容将显示到文本框中，用户可以在文本框中对相关内容进行编辑，按回车键后，能够用编辑好的内容替换被选中的列表项，并自动清空文本框;当双击某个列表项时，则从列表框中删除该列表项;当用户直接在文本框中键入文本并按回车键后，则把该文本添加为列表框的一个新列表项，添加完成后，将文本框清空。
运行窗体如图所示。
要求：程序已经给出，但不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。
注意：考生不得修改窗体文件中已经存在的控件和程序。
最后程序按原文件名存盘。
全国计算机二级VB上机题库(题+答案)
一、基本操作题下面出现的“考生文件夹”均为c:\wexam\20060001。
请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。
1．在窗体上建立一个二级菜单，该菜单含有“文件”和“帮助”两个主菜单项（名称分别为vbFile和vbHelp），其中“文件”菜单包括“打开”、“关闭”和“退出”三个子菜单项（名称分别为vbOpen、vbClose和vbExit）。
只建立菜单，不必定义其事件过程。
注意：保存时必须存放在考生文件夹下，窗体文件名为kt1.frm，工程文件名为kt1.vbp。
2．在名称为Form1的窗体上建立两个名称分别为Cmd1和Cmd2、标题分别为“喜欢”和“不喜欢”的命令按钮。
编写适当的事件过程，要求程序运行后，如果单击“喜欢”命令按钮，则在窗体上显示“数理化”；如果单击“不喜欢”命令按钮，则在窗体上显示“政史地”。
程序中不能使用任何变量，直接显示字符串。
注意：保存时必须存放在考生文件夹下，窗体文件名为kt2.frm，工程文件名为kt2.vbp。
一、基本操作题答案1．【解题步骤】（1）打开“菜单编辑器”。
（2）菜单设计见表4-1。
表4-1标题名称内缩符号文件vbFile0打开vbOpen1关闭vbClose1退出vbExit1帮助vbHelp0（3）按要求设计含有“文件”和“帮助”的菜单栏。
（4）为“文件”菜单设计“打开”、“关闭”和“退出”三个子菜单项。
（5）设计完成之后，按规定方式存盘。
2．【解题步骤】（1）建立界面和控件并设置控件属性。
程序中用到的控件及其属性见表4-2。
表4-2控件属性设置值按钮Name Cmd1Caption喜欢按钮Name Cmd2Caption不喜欢（2）编写程序代码。
参考代码：Private Sub Cmd1_Click()Print"数理化"End SubPrivate Sub Cmd2_Click()Print"政史地"End Sub（3）调试并运行程序。