VB新增试题答案和解析要点.docx
《VB新增试题答案和解析要点.docx》由会员分享，可在线阅读，更多相关《VB新增试题答案和解析要点.docx（15页珍藏版）》请在冰豆网上搜索。
VB新增试题答案和解析要点
※※※※※※※※※※※※※※※※※※※※
第21套：
基本操作
请根据以下各小题的要求设计VisualBasic应用程序（包括界面和代码）。
（1）在名称为Form1的窗体上画1个名称为Shape1的圆角矩形，高、宽分别为1000、2000。
请利用属性窗口设置适当的属性满足以下要求：
1）圆角矩形中填满绿色（颜色值为：
&H0000FF00&或&HFF00&）；
2）窗体的标题为“圆角矩形”。
运行后的窗体如图所示。
注意：
存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。
【微步骤】
步骤1：
启动VisualBasic系统，创建一个Form1窗体。
步骤2：
在该窗体上画一个形状控件，通过其属性窗口将名称设为shape1，高（Height属性）设为1000，宽（Width属性）设为2000，Shape属性设为4，FillStyle属性设为0，FillColor属性设为&HFF00&。
步骤3：
激活Form1窗体，通过其属性窗口将标题（Caption属性）设为“圆角矩形”。
步骤4：
调试并运行程序，设置工程文件名为sjt1.vbp，设置窗体文件名为sjt1.frm。
（2）在考生文件夹下有一个工程文件sjt2.vbp。
窗体中已含有除计时器外的其他控件，还有一个过程sub1，其功能是按照Text1中的通话时间计算通话费，并将其显示在Text2中。
程序运行时，单击“通话开始”按钮，则在Text1中累加通话时间（每秒加1），单击“通话结束”按钮，则停止通话时间的累加；单击“计算通话费”按钮，则调用过程sub1。
要求：
1）在窗体上画一个计时器（见图），并通过属性窗口设置适当属性。
2）编写三个按钮的Click事件过程。
3）编写计时器的事件过程。
注意：
要求程序中不得使用变量，每个事件过程中只能写一条语句，“计算通话费”按钮的事件过程中只允许调用过程sub1。
不得修改已经存在的内容和控件属性，最后把文件按原文件名存盘。
【微步骤】
步骤1：
启动VisualBasic系统，打开考生文件夹下需编辑的工程文件sjt2.vbp，相应的窗体文件名为sjt2.frm。
步骤2：
由于所提供的窗体控件不完整，需在该窗体上画一个计时器控件，计时器开始不计时，即把（Enabled属性）设为False，Interval属性设为1000（每秒加1）。
步骤3：
双击“通话开始”按钮（即运行Click事件过程），在该Click事件过程中加入语句：
PrivateSubCommand1_Click（）
Timer1.Enabled=True
EndSub
步骤4：
单击“通话结束”按钮（即运行Click事件过程），在该Click事件过程中加入语句：
PrivateSubCommand2_Click（）
Timer1.Enabled=False
EndSub
步骤5：
单击“计算通话费”按钮（即运行Click事件过程），在该Click事件过程中加入语句：
PrivateSubCommand3_Click（）
sub1
EndSub
步骤6：
计时器的Timer事件过程，在该Timer事件过程中加入语句：
PrivateSubTimer1_Timer（）
Text1=Text1+1
EndSub
步骤7：
调试并运行程序，关闭程序后按题目要求存盘。
简单应用
（1）在考生文件夹下有一个工程文件sjt3.vbp。
程序运行时，单击窗体则显示如图所示的图案。
请去掉程序中的注释符，把程序中的？
改为正确的内容。
注意：
不能修改程序的其他部分和控件属性。
最后把修改后的文件按原文件名存盘。
【微步骤】
步骤1：
启动VisualBasic系统，打开考生文件夹下需编辑的工程文件sjt3.vbp，相应的窗体文件名为sjt3.frm。
步骤2：
进入代码编辑窗口。
由于所提供的窗体程序不完整，在窗体的PrivateSubForm_Click（）事件过程中，按以下要求修改程序中的问号。
第1个问号（'Fori=1To?
）：
5
第2个问号（'Forj=1To?
）：
2*i-1
第3个问号（'Forj=1To?
）：
i+1
第4个问号（'Forj=1To?
）：
9-2*i
步骤3：
调试并运行程序，关闭程序后按题目要求存盘。
（2）在考生文件夹下有一个工程文件sjt4.vbp，窗体中有一个矩形和一个圆，程序运行时，单击“开始”按钮，圆可以纵向或横向运动（通过选择单选按钮来决定），碰到矩形的边时，则向相反方向运动，单击“停止”按钮，则停止运动，如图所示。
可以选择单选按钮随时改变运动方向。
已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的？
改为正确的内容。
注意：
不得修改已经存在的内容和控件属性，最后把修改后的文件按原文件名存盘。
【微步骤】
步骤1：
启动VisualBasic系统，打开考生文件夹下需编辑的工程文件sjt4.vbp，相应的窗体文件名为sjt4.frm。
步骤2：
进入代码编辑窗口。
由于所提供的窗体程序不完整，在“停止”按钮的PrivateSubCommand2_Click（）事件过程和计时器的PrivateSubTimer1_Timer（）事件过程中，按如下要求修改程序中的问号。
第1个问号（'?
=False）：
Timer1
第2个问号（'Shape2.Top=?
+d*50）：
Shape2.Top
第3个问号（'IfShape2.Top<=Shape1.?
OrShape2.Top+Shape2.Width>=Shape1.Top+Shape1.HeightThen）：
Top
第4个问号（'Shape2.Left=?
+d*50）：
Shape2.Left
步骤3：
调试并运行程序，关闭程序后按题目要求存盘。
综合应用
注意：
下面出现的“考生文件夹”均为%USER%
在考生文件夹下有一个工程文件sjt5.vbp。
程序运行时，单击“装入数据”按钮，则从考生目录下的in5.txt文件中读入所有城市名称和距离，城市名称按顺序添加到列表框List1中，距离放到数组a中；当选中列表框中的一个城市时，它的距离就显示在Text1中，如图所示；此时，单击“计算运费”按钮，则计算到该城市的每吨运费（结果取整，不四舍五入），并显示在Text2中。
每吨运费的计算方法是：
距离×折扣×单价。
其中：
单价为0.3。
折扣为距离<500折扣为1
500≤距离<1000折扣为0.98
1000≤距离<1500折扣为0.95
1500≤距离<2000折扣为0.92
2000≤距离折扣为0.9
单击“保存”按钮，则把距离和每吨运费存到文件out5.txt中。
已经给出了所有控件和部分程序，要求：
1）去掉程序中的注释符，把程序中的？
改为正确的内容；
2）编写列表框的Click事件过程；
3）编写“计算运费”按钮的Click事件过程；
注意：
不得修改已经存在的程序；在退出程序之前，必须至少计算一次运费，且必须用“保存”按钮存储计算结果，否则无成绩。
最后，程序按原文件名存盘。
【微步骤】
步骤1：
启动VisualBasic系统，打开考生文件夹下需编辑的工程文件sjt5.vbp，相应的窗体文件名为sjt5.frm。
步骤2：
双击“计算运费”按钮（即运行Click事件过程），在该Click事件过程中加入语句：
PrivateSubCommand2_Click（）
p=0.3
d=Int（Text1.Text/500）
SelectCased
Case0
discount=1
Case1
discount=0.98
Case2
discount=0.95
Case3
discount=0.92
CaseElse
discount=0.9
EndSelect
Text2=Int（discount*p*Text1）
EndSub
步骤3：
选择列表框中的某个城市（即运行Click事件过程），在该Click事件过程中加入语句：
PrivateSubList1_Click（）
Text1=a（List1.ListIndex+1）
EndSub
步骤4：
在“装入数据”按钮的PrivateSubCommand1_Click（）事件过程中，按以下要求修改程序中的问号。
第1个问号（'n=n+?
）：
1
第2个问号（'List1.AddItem?
）：
ch$
步骤5：
调试并运行程序，关闭程序后按题目要求存盘。
第48套：
基本操作
请根据以下各小题的要求设计VisualBasic应用程序（包括界面和代码）。
（1）在名称为Form1的窗体上画1个名称为Cbo1的组合框，组合框的列表项分别是：
北京、天津、上海。
请设置组合框的参数，使其外观如图所示。
窗体的标题是“使用组合框”。
注意：
存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt1.frm，工程文件名为sjt1.vbp。
【微步骤】
步骤1：
启动VisualBasic系统，创建一个Form1窗体。
步骤2：
在该窗体上画一个组合框控件，通过其属性窗口将名称设为Cbo1，高（Height属性）设为1000，宽（Width属性）设为2000，Shape属性设为4，FillStyle属性设为0，FillColor属性设为&HFF00&。
步骤3：
激活Form1窗体，通过其属性窗口将标题（Caption属性）设为“圆角矩形”。
步骤4：
调试并运行程序，设置工程文件名为sjt1.vbp，设置窗体文件名为sjt1.frm。
（2）在名称为Form1的窗体上画1个名称为P1的图片框，窗体的标题为“程序设计”，如图1所示。
编写适当的事件过程，使得程序运行后，单击窗体，则在图片框中显示窗体的标题，并把窗体的标题变为“Basic”，如图2所示。
注意：
存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt2.frm，工程文件名为sjt2.vbp。
简单应用
（1）在考生文件夹中有一个工程文件sjt3.vbp，窗体上有2个命令按钮、1个水平滚动条和1个计时器，其名称分别为Command1、Command2、HScroll1和Timer1，如图1所示。
程序运行后，按钮Command1、Command2的标题分别立即显示"开始"、"停止"，同时把计时器的Interval属性设置为100，Enabled属性设置为False。
此时如果单击"开始"按钮，则该按钮变为禁用，而标题则变为"继续"，同时滚动条的滚动框自左至右移动，每次移动10，如图2所示，移到右端时，自动从左端重新开始向右移动；如果单击"停止"命令按钮，则该按钮变为禁用，"继续"命令按钮变为有效，同时滚动框停止移动；再次单击"继续"命令按钮后，滚动框继续移动。
已经给出了全部控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的？
改为正确的内容。
注意：
考生不得修改窗体文件中已经存在的程序。
最后程序按原文件名存盘。
（2）在考生文件夹下有一个工程文件sjt4.vbp，窗体上有2个名称分别为Text1、Text2的文本框，有1个名称为Command1的命令按钮。
程序运行时，在Text1文本框中输入一行单词（只含有字母或空格），单击命令按钮后，将把每个单词的第一个字母改为大写（如果原来已是大写字母则不变），
升级会员 