2004年全国计算机等级考试二级VB全真上机试题解析

2004年全国计算机等级考试VB二级真题分析

问题1:

考生文件夹下有一个工程文件sjt5.vbp，有一个名为Text1的文本框；就其形式而言；还有两个命令按钮，名为C1和C2，标题分别为“计算”和“保存”，如图所示。并且有一个函数过程isprime可以在程序中直接调用。它的作用是判断参数A是否是素数，如果是，则返回True，否则返回False。请编写一个适当的事件过程，以便在运行时，单击“计算”按钮找出小于18000的质数，并在Text1中显示出来；点击“保存”按钮，将Text1中的计算结果保存在考生文件夹下的out5.txt文件中。

这个题目主要考两个，一个是循环，一个是文件访问。
由于在18000以内搜索素数，并且已经给出了判断素数的函数，只要在18000以下用一个周期搜索，没有找到减法和重复搜索，那么这个发现就记录在Text1中。结构化程序中不再提倡文本GoTo和exit from the structure(例如Exit For等)。)，而判断则是更好的选择。

问题2:

考生文件夹下有一个工程文件sjt4.vbp，表单上已经有两个文本框，分别命名为Text1和Text2分别是；以及名为C1且标题为“确定”的命令按钮；请画两个单选按钮，名称为Op1和Op2，标题为“男生”和“女生”。画两个复选框，命名为Ch1和Ch2，标题为“体育”和“音乐”。请编写一个适当的事件过程，以便在运行时，单击确定按钮后实现以下要求:
1)根据选择的单选按钮，将在Text1中显示“我是男生”或“我是女生”。
2)根据选中的复选框，会在Text2中显示“我的爱好是体育”或“我的爱好是音乐”或“我的爱好是体育音乐”。如图所示。
注意:您不能修改给定程序和现有控件的属性。在结束程序之前，您必须选择一个单选按钮和至少一个复选框，然后单击“确定”按钮。您必须使用表单右上角的关闭按钮来结束程序，否则将不会有结果。

分析:单选按钮OptionButton和复选框option的简单应用按钮控件和复选框控件的功能相似，但两者也有重要的区别。当选择一个OptionButton时，同一组中的其他OptionButton控件将自动失效。相反，您可以选择任意数量的复选框控件。
只注意这一点。这个题目可以判断他们在C1_Click事件中的选择。OptionButton的值为True表示选择，CheckBox = 1表示选择。

问题3:

在名为Form1的表单上画一个标签，名为L1，显示“请输入您的密码”，在标签右侧画一个文本框，名为Text1，宽度和高度分别为2000和300。设置适当的属性，以便当您输入密码时，文本框中将显示“*”字符，然后将表单的标题设置为“密码窗口”。所有这些设置只能在属性窗口中设置。*注意:保存时必须保存在考生文件夹中。项目文件名为sjt1.vbp，表单文件名为sjt1.frm

分析:创建的对象设置属性。“属性”窗口(选中它并按[F4]调出它)提供了一个简单的方法来设置表单对象的所有属性。通过从“视图”菜单中选择“属性窗口”命令，单击工具栏上的“属性窗口”按钮，或者使用控件的上下文菜单，可以打开属性窗口。在这个问题中，只要将Text1的PasswordChar属性设置为*，就需要设置密码框。

问题4:

考生文件夹下有一个工程文件sjt3.vbp，表单上已经有一个标签L1。请绘制一个名为Op1的单选按钮数组，其中包含三个单选按钮。它们的索引属性为0、1、2，标题依次为“飞机”、“火车”、“汽车”。然后绘制一个名为Text1的文本框。表单文件中已经给出了Op1的Click事件过程，但是并不完整。需要删除程序中的注释，并更改？更改为正确的内容，这样当你在发货过程中点击“飞机”或“火车”单选按钮时，会在Text1中显示“我将乘飞机”或“我将乘火车”，当你点击“汽车”单选按钮时，会在Text1中显示“我将开车”，如图所示。注意:程序的其他部分不能修改。最后，按照原文件名保存修改后的文件。

这个问题考查对OptionButton控件的理解。OptionButton控件显示可以打开或关闭的选项。value属性用于确定它是否被选中。如果选中，则为真，否则为假。
通常使用OptionButton控件是为了让大多数人喜欢使用控件数组。在第一个问题中，Select Cas语句根据表达式的值决定执行几组语句中的一组。根据随后的说法，我们可以知道，根据用户的选择，是有分流需求的。转移是基于用户选择了哪个选项按钮，这可以通过索引获得。这里填写Index，秒空为白色。只要知道OptionButton数组从零开始，就不难判断Op1(1)。Caption是一个“火车”，所以我们只能“坐着”填一个。

问题5:

考生文件夹下有一个工程文件sjt5.vbp，表格上有两个图片框，分别命名为
P1和P2，分别用来代表信号灯和汽车。其中，“黄灯。ico”，“红灯。ico”和“绿灯。ico”文件依次加载在P1以切换信号灯；还有两个定时器定时器1和定时器2。定时器1用于改变信号灯，黄灯1秒，红灯2秒，绿灯3秒。定时器2用于控制轿厢向左移动。运行时，信号灯是不断变化的。点击“驱动”按钮。汽车开始移动。如果它移动到前方或信号灯下，遇到红灯或黄灯，就会停止移动。当它变成绿色时，它将继续移动。所有控件和程序都已在表单中给出，但程序不完整。
要求读取程序并删除程序中的注释，并将？改成正确的内容，这样可以实现上面的功能，但是程序的其他部分不能修改，控件的属性也不能修改。最后，用原始文件名保存修改后的文件。

这个问题涉及三个事件
。点击启动按钮C1点击，汽车启动。由问题可知，汽车的启动是由定时器2控制的，所以这里必须启动定时器2，所以填定时器2。Enable = true
，交通灯由定时器1控制。在定时器1的定时器1 _定时器事件中，P1的图像。画面根据时间A变化，从而达到红绿灯转换的效果。如果看到其他灯已经存在，在这里填写“green light.ioc”是一个简单的选择。仔细分析后，有必要这样填写
。最后，已知汽车的运动由定时器2操作。要在其事件Timer2_Timer中移动汽车，使用picture的Move方法，将其平行向右移动，并更改Left值。填写图片1。离开这里去实现它。
定时器控件和图片控件的其他属性方法事件请参考相关资料。
问题6:

考生文件夹下有一个工程文件sjt5.vbp。请在表格上画两个框，分别叫F1和F2，标题分别是“运输”和“到达目标”。在F1中绘制两个单选按钮。名字是Op1和Op2，标题是“飞机”和“火车”。在F2中画两个单选按钮，名称为Op3和Op4，标题为“广州”和“昆明”。绘制一个名为Text1的文本框。编写适当的事件过程。程序运行后，选择不同单选按钮时生成的显示结果如下表所示

程序的运行状态如图所示。保存时项目文件名为sjt5.vbp，表单文件名为sjt5.frm

单选按钮的Value属性:
Value属性用于表示单选按钮的状态，可以取两个值:True和False。当值为真时，单选按钮为“开”，按钮中央有一个圆点；当值为False时，单选按钮为“off ”,按钮为圆形。
设置单选按钮的Value属性的语法是:
单选按钮名称。Value = True(-1)或false (0)
由于Value属性是单选按钮的默认属性，因此在设置该属性的值时可以省略属性名称。
问题解决方法:
打开项目文件sjt5.vbp，单击工具箱中的框架控件图标，然后在窗体上拖出两个框架，通过属性窗口将其名称属性设置为“F1”和“F2”，标题属性设置为“车辆”和“到达目标”。
单击工具箱中的OptionButton控件图标，然后在F1中拖出两个单选按钮，通过属性窗口将它们的名称属性设置为“Op1”和“Op2”，将标题属性设置为“飞机”和“火车”。
单击工具箱中的OptionButton控件图标，在F2中拖出两个单选按钮，通过属性窗口将其名称属性设置为“Op3”和“Op4”，标题属性设置为“广州”和“昆明”。
单击工具箱中的“文本框”控件图标，然后在窗体上拖动一个文本框。
打开代码窗口，输入以下代码:
private subform _ click()
ifop 1 . value = true then
ifop 3 . value = true then
text 1 . text = "飞去广州"
else if op4 . value = true then
text 1 . text = "飞去昆明"
Endif
else if op2 . value = true then
op3 . value = true

问题7:

考生文件夹下有一个项目文件sjt6.vbp。请在表单上画三个文本框，名称分别为Text1、Text2、Text3，文本框内容分别设置为“等级考试”、“计算机”和空白色。然后画两个单选按钮，命名为Op1和Op2，标题为“交换”和“连接”(如图)，并编写相应的事件程序。程序发货后，如果选中“交换”单选按钮，点击Text3文本框，Text1文本框中的内容与Text2文本框中的内容进行交换，Text3文本框中显示“交换进工作”；如果选择了“连接”单选按钮并单击了“文本3”文本框，则“文本1”和“文本2”的内容将按照“文本1”和“文本2”的顺序进行连接，连接的内容将显示在“文本3”文本框中。保存时，项目文件名为sjt6.vbp，表单文件名为sjt6.frm
解题方法:
打开项目文件sjt6.vbp，单击工具箱中的TextBox控件图标，然后在表单上拖出三个文本框，通过属性窗口将它们的文本属性设置为“等级测试”、“计算机”和“”。
单击工具箱中的OptionButton控件图标，然后在表单中拖出两个单选按钮，通过属性窗口将它们的Name属性设置为“Op1”和“Op2”，将Caption属性设置为“exchange”和“connect”。
打开代码窗口，输入以下代码:
private subtext 3 _ click()
if op1 . value then
text 1 . text = " computer "
text 2 . text = " grade test "
3 .Text = "成功交换"
else
text 3 . text = text 1 . text+text 2 . text
end if
end sub

问题8:

在Form1的窗体上画一个文本框，名字叫Text1；画两个命令按钮，
，它们的名字是C1和C2，标题是“显示”和“退出”，并编写适当的事件过程。程序运行后，加载表单时“退出”按钮不可用。如果点击“显示”按钮，文本框中会显示“等级考试”，并且“退出”按钮可用。这时如果点击“退出”按钮，程序就结束了，程序操作如图所示。

如何解决:
新建一个名为Form1的窗体，单击工具箱中的CommandButton控件图标，然后在窗体上拖出两个命令按钮。通过属性窗口将其名称属性设置为“C1”和“C2”，标题属性设置为“显示”和“退出”。
单击工具箱中的“文本框”控件图标，然后在窗体上拖动一个文本框。
打开代码窗口，输入以下代码:
private subc 1 _ click()
C2 . enabled = true
text 1 . text = " grade test "
end sub
private subc 2 _ click()。

问题9:

在Form1的窗体上绘制一个命令按钮，名称为C1，标题为“显示”；绘制
另一个名为Text1的文本框，并编写适当的事件过程。程序运行后，加载窗口时文本框将不可见。如果双击表单，将会出现文本框。此时，如果单击命令按钮，文本框中将显示“等级考试”。程序的操作如图所示。

解决方案:
新建一个名为Form1的窗体，单击工具箱中的CommandButton控件图标，然后在窗体上拖动一个命令按钮，通过属性窗口将其name属性设置为“C1”，Caption属性设置为“显示”。
单击工具箱中的“文本框”控件图标，然后在窗体上拖动一个文本框。
打开代码窗口，输入以下代码:
private subc 1 _ click()
text 1 . text = " grade test "
end sub
private subform _ dblclick()
)text 1。visible = True
:End Sub
:Private Sub Form _ Load()
:text 1。visible = False
:End Sub

问题10:

在窗体上绘制一个文本框，其名称为Text1，Text属性为空 white。绘制另一个名为“C1”且Visible属性为False的命令按钮。编写适当的事件过程。程序运行后，如果您在文本框中输入字符，命令按钮将会出现。程序的操作如图所示。
解决方案:
新建一个窗体，单击工具箱中的TextBox控件图标，然后在窗体上拖动一个文本框，通过属性窗口将其Text属性设置为" "。
单击工具箱中的CommandButton控件图标，然后在窗体上拖动一个命令按钮，通过属性窗口将其Name属性设置为“C1”，visible属性设置为False。
打开代码窗口并输入以下代码:
private subtext 1 _ change()
C1 . visible = true
end sub
根据需要保存文件以完成本主题。