全国计算机等级考试二级VB全真上机试题解析.docx
- 文档编号:8514645
- 上传时间:2023-01-31
- 格式:DOCX
- 页数:15
- 大小:25.66KB
全国计算机等级考试二级VB全真上机试题解析.docx
《全国计算机等级考试二级VB全真上机试题解析.docx》由会员分享,可在线阅读,更多相关《全国计算机等级考试二级VB全真上机试题解析.docx(15页珍藏版)》请在冰豆网上搜索。
全国计算机等级考试二级VB全真上机试题解析
2004年全国计算机等级考试二级VB全真上机试题解析
2004年全国计算机等级考试二级VB全真上机试题解析第1题:
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为"计算"、"存盘",如图所示。
并有一个函数过程isprime可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。
请编写适当的事件过程,使得在运行时,单击"计算"按钮,则找出小于18000的最大的素数,并显示在Text1中;单击"存盘"按钮,则把Text1中的计算结果存入考生文件夹下的out5.txt文件中。
本题的考查主要有两个,一个是循环,一个是文件的访问。
由于在小于18000中寻找最大素数,并且判断素数的函数已经给出,只要使用一个循环在18000以下寻找,没有找到减一再寻找,找到记录在Text1.Text中,在结构化的程序中不再提倡GoTo以及从结构体中退出(例如ExitFor等),使用While判断是一个较好的选择
第2题
在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经有两个文本框,名称分别为Text1、Text2;和一个命令按钮,名称为C1,标题为"确定";请画两个单选按钮,名称分别为Op1、Op2,标题分别为"男生"、"女生";再画两个复选框,名称分别为Ch1、Ch2,标题分别为"体育"、"音乐"。
请编写适当的事件过程,使得在运行时,单击"确定"按钮后实现下面的要求:
1)根据选中的单选按钮,在Text1中显示"我是男生"或"我是女生"。
2)根据选中的复选框,在Text2中显示"我的爱好是体育"或"我的爱好是音乐"或"我的爱好是体育音乐"。
如图所示。
注意:
不得修改已经给出的程序和已有控件的属性。
在结束程序运行之前,必须选中一个单选按钮和至少一个复选框,并单击"确定"按钮。
必须使用窗体右上角的关闭按钮结束程序,否则无成绩。
分析:
单选按钮OptionButton和选择框CheckBox的简单应用OptionButton控件和CheckBox控件功能相似,但是二者间也存在着重要差别。
在选择一个OptionButton时,同组中的其它OptionButton控件自动无效。
相反,可以选择任意数量的CheckBox控件。
只要注意了这一点本题可以在C1_Click事件中判断他们的选中情况OptionButton的Value为True表示选中,CheckBox的Value=1时表示选中。
第3题:
在名称为Form1的窗体上画一个标签,名称为L1,标签上显示"请输入密码",在标签的右边画一个文本框,名称为Text1,其宽、高分别为2000和300,设置适当的属性使得在输入密码时,文本框中显示"*"字符,此外再把窗体的标题设置为"密码窗口",以上这些设置都只能在属性窗口中进行设置,运行时的窗体如图所示。
*注意:
存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
分析:
创建的对象设置属性。
属性窗口(选中对按[F4]调出)给出了设置所有的窗体对象属性的简便方法。
在"视图"菜单中选择"属性窗口"命令、单击工具栏上的"属性窗口"按钮或使用控件的上下文菜单,都可以打开属性窗口。
在本题中要求对于密码框的设定,只要为Text1的PasswordChar属性设置为*即可完成
第4题:
在考生文件夹下有一个工程文件sjt3.vbp,窗体上已经有一个标签L1,请画一个单选按钮数组,名称为Op1,含三个单选按钮,它们的Index属性分别为0、1、2,标题依次为"飞机"、"火车"、"汽车",再画一个名称为Text1的文本框。
窗体文件中已经给出了Op1的Click事件过程,但不完整,要求去掉程序中的注释符,把程序中的?
改为正确的内容,使得在运行时单击"飞机"或"火车"单选按钮时,在Text1中显示"我坐飞机去"或"我坐火车去",单击"汽车"单选按钮时,在Text1中显示"我开汽车去",如图所示。
注意:
不能修改程序中的其他部分。
最后把修改后的文件按原文件名存盘。
本题考查对于OptionButton控件的了解,OptionButton控件显示一个可以打开或者关闭的选项,判断它是否被选中使用的是value属性,选中为True,反之为False。
一般在使用OptionButton控件使大多数人喜欢使用控件数组,在第一题中SelectCas语句是根据表达式的值,来决定执行几组语句中的其中之一。
根据后续的语句我们可以知道,这里需要根据用户的选择进行分流,分流的依据是用户选择了那一个OptionButton,这个可以由Index得到,这里填入Index,第二个空白,我们只要知道OptionButton数组从零开始,不难判断Op1
(1).Caption是"火车",我们只能"坐",填入a即可。
第5题
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个图片框,名称为
P1、P2,分别用来表示信号灯和汽车,其中在P1中轮流装入"黄灯.ico"、"红灯.ico"、"绿灯.ico"文件来实现信号灯的切换;还有两个计时器Timer1和Timer2,Timer1用于变换信号灯,黄灯1秒,红灯2秒,绿灯3秒;Timer2用于控制汽车向左移动。
运行时,信号灯不断变换,单击"开车"按钮后。
汽车开始移动,如果移动到信号灯前或信号灯下,遇到红灯或黄灯,则停止移动,当变为绿灯后再继续移动。
在窗体中已经给出了全部控件和程序,但程序不完整,
要求阅读程序并去掉程序中的注释符,把程序中的?
改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。
最后把修改后的文件以原文件名存盘。
本题中涉及三个事件
点击开车按钮C1_Click,汽车开始启动,由题面知道汽车的开动由Timer2控制,那么这里必须启动Timer2,所以填入Timer2.Enable=True
红绿灯由Timer1控制,在Timer1的事件Timer1_Timer中根据时间a来更换P1.Picture的图像,达到红绿灯转换的效果,如果看到其他灯已经有了,这里填入"绿灯.ioc"是简单的选择,仔细分析要在绿灯有三秒,也必须这样填写
最后是汽车的移动,已知是由Timer2操作的,在它的事件Timer2_Timer中要移动汽车,使用了picture的Move方法,平行向右移动,改变Left值,这里填入picture1.Left即可实现。
其他关于Timer控件以及picture控件的属性方法事件请自己参阅有关资料。
第6题:
在考生文件夹下有一个工程文件sjt5.vbp,请在窗体上画两个框架,其名称分别为F1和F2,标题分别为"交通工具"和"到达目标"。
在F1中画两个单选按钮,名称分别为Op1和Op2,标题分别为"飞机"和"火车"。
在F2中画两个单选按钮,名称分别为Op3和Op4,标题分别为"广州"和"昆明"。
画一个文本框,其名称为Text1。
编写适当事件过程。
程序运行后,选择不同单选按钮时产生的显示结果见下表
程序的运行情况如图所示。
存盘时,工程文件名为sjt5.vbp,窗体文件名为sjt5.frm。
单选按钮的Value属性:
Value属性用来表示单选按钮的状态,可以取True和False两种值,取值为True时,单选按钮是"打开"的,按钮中心有一个圆点;取值为False时,单选按钮是"关闭"的,按钮是一个圆圈。
设置单选按钮Value属性的语法是:
单选按钮名.Value=True(-1)或False(0)
由于Value属性是单选按钮的缺省属性,因此在设置该属性的值的时候,可以省略属性名。
解题方法:
打开工程文件sjt5.vbp,点击工具箱中的Frame控件图标,然后在窗体上拖拉出两个框架,通过属性窗口分别设置其Name属性为"F1"和"F2",Caption属性为"交通工具"和"到达目标"。
点击工具箱中的OptionButton控件图标,然后在F1中拖拉出两个单选按钮,通过属性窗口分别设置其Name属性为"Op1"和"Op2",Caption属性为"飞机"和"火车"。
点击工具箱中的OptionButton控件图标,然后在F2中拖拉出两个单选按钮,通过属性窗口分别设置其Name属性为"Op3"和"Op4",Caption属性为"广州"和"昆明"。
点击工具箱中的TextBox控件图标,然后在窗体上拖拉出一个文本框。
打开代码窗口,输入如下的代码:
PrivateSubForm_Click()
IfOp1.Value=TrueThen
IfOp3.Value=TrueThen
Text1.Text="坐飞机去广州"
ElseIfOp4.Value=TrueThen
Text1.Text="坐飞机去昆明"
EndIf
ElseIfOp2.Value=TrueThen
IfOp3.Value=TrueThen
Text1.Text="坐火车去广州"
ElseIfOp4.Value=TrueThen
Text1.Text="坐火车去昆明"
EndIf
EndIf
EndSub
第7题:
在考生文件夹下有一个工程文件sjt6.vbp,请在窗体上画三个文本框,其名称分别为Text1、Text2和Text3,文本框内容分别设置为"等级考试"、"计算机"和空白。
然后画两个单选按钮,其名称分别为Op1和Op2,标题分别为"交换"和"连接"(如图所示),编写适当的事件程序。
程序运行后,如果选中"交换"单选按钮并单击Text3文本框,则Text1文本框中内容与Text2文本框中内容进行交换,并在Text3文本框中显示"交换成功";如果选中"连接"单选按钮并单击Text3文本框,则把Text1和Text2的内容按Text1、Text2的顺序连接起来,并在Text3文本框中显示连接后的内容。
存盘时,工程文件名为sjt6.vbp,窗体文件名为sjt6.frm。
解题方法:
打开工程文件sjt6.vbp,点击工具箱中的TextBox控件图标,然后在窗体上拖拉出三个文本框,通过属性窗口分别设置其Text属性为"等级考试"、"计算机"和""。
点击工具箱中的OptionButton控件图标,然后在窗体中拖拉出两个单选按钮,通过属性窗口分别设置其Name属性为"Op1"和"Op2",Caption属性为"交换"和"连接"。
打开代码窗口,输入如下的代码:
PrivateSubText3_Click()
IfOp1.ValueThen
Text1.Text="计算机"
Text2.Text="等级考试"
Text3.Text="交换成功"
Else
Text3.Text=Text1.Text+Text2.Text
EndIf
EndSub
第8题:
在Form1的窗体上画一个文本框,其名称为Text1;再画两个命令按钮,
其名称分别为C1和C2,标题分别为"显示"和"退出",编写适当的事件过程。
程序运行后,在窗体加载时使"退出"按钮不可用,如果单击"显示"按钮,则在文本框中显示"等级考试",并使"退出"按钮可用,此时如果单击"退出"按钮,则结束程序,程序运行情况如图所示。
解题方法:
新建一个名为Form1的窗体,点击工具箱中的CommandButton控件图标,然后在窗体上拖拉出两个命令按钮,通过属性窗口分别设置其Name属性为"C1"和"C2",Caption属性为"显示"和"退出"。
点击工具箱中的TextBox控件图标,然后在窗体上拖拉出一个文本框。
打开代码窗口,输入如下的代码:
PrivateSubC1_Click()
C2.Enabled=True
Text1.Text="等级考试"
EndSub
PrivateSubC2_Click()
End
EndSub
第9题:
在Form1的窗体上画一个命令按钮,其名称为C1,标题为"显示";再画
一个文本框,其名称为Text1,编写适当的事件过程。
程序运行后,在窗体加载时使文本框不可见,如果双击窗体,则文本框出现;此时如果单击命令按钮,则在文本框中显示"等级考试"。
程序运行情况如图所示。
解题方法:
新建一个名为Form1的窗体,点击工具箱中的CommandButton控件图标,然后在窗体上拖拉出一个命令按钮,通过属性窗口设置其Name属性为"C1",Caption属性为"显示"。
点击工具箱中的TextBox控件图标,然后在窗体上拖拉出一个文本框。
打开代码窗口,输入如下的代码:
PrivateSubC1_Click()
Text1.Text="等级考试"
EndSub
PrivateSubForm_DblClick()
Text1.Visible=True
EndSub
PrivateSubForm_Load()
Text1.Visible=False
EndSub
第10题:
在窗体上画一个文本框,其名称为Text1,Text属性为空白。
再画一个命令按钮,其名称为C1,Visible属性为False。
编写适当的事件过程。
程序运行后,如果在文本框中输入字符,则命令按钮出现。
程序运行情况如图所示。
解题方法:
新建一个窗体,点击工具箱中的TextBox控件图标,然后在窗体上拖拉出一个文本框,通过属性窗口设置其Text属性为""。
点击工具箱中的CommandButton控件图标,然后在窗体上拖拉出一个命令按钮,通过属性窗口设置其Name属性为"C1",Visible属性为False。
打开代码窗口,输入如下的代码:
PrivateSubText1_Change()
C1.Visible=True
EndSub
按要求保存文件即完成本题。
一。
选择题
(1)设窗体上有一个文本框,Text1,要求只能显示信息,不能体Form1的标题栏中显示“VisualBasic窗体"的语句是
A)Form1.Name="VisualBasic窗体"
B)Form1.Title="VisualBasic窗体"
C)Form1.Caption="VisualBasic窗体"
D)Form1.Text="VisualBasic窗体“
答案:
C
(3)在窗体上画一个名称为Text1的文本框,然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100。
程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,如图所示:
(图片暂缺,)以下能实现上述操作的程序段是
A)PrivateSubHScroll_Change()
Text1.Text=HScroll1.Value
EndSub
B)PrivateSubHScroll_Click()
Text1.Text=HScroll1.Value
EndSub
C)PrivateSubHScroll_Change()
Text1.Text=HScroll.Caption
D)PrivateSubHScroll_Click()
Text1.Text=HScroll.Caption
EndSub答案:
A(4)设菜单中有一个菜单项为"Open"。
若要为该菜单命令设计访问键,即按下Alt及字母O时,能够执行"Open"命令,则在菜单编辑器中设置“Open"命令的方式是
A)把Caption属性设置为&Open
B)把Caption属性设置为O&pen
C)把Name属性设置为&Open
D)把Name属性设置为O&pen答案:
A
(5)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
x=InputBox("Input")
SelectCasex
Case1,3
Print"分支1"
CaseIs>4
Print"分支2"
CaseElse
Print"Else分支"
EndSelect
EndSub
程序运行后,如果在输入对话框中输入2,则窗体上显示的是
A)分支1 B)分支2)程序出错
答案:
C
(6)以下关于MsgBox的叙述中,错误的是
A)MsgBox函数返回一个整数
B)通过MsgBox函数可以设置信息框中图标和按钮的类型
C)MsgBox语句没有返回值
D)MsgBox函数的第一个参数是一个整数,该参数只能确定对话框中显示的按钮数量答案:
D
(7)在窗体上画一个名称为Timer1的计时器控件,要求每隔0.5秒发生一次计时器事件,则以下正确的属性设置语句是
A)Timer1.InterVal=0.5 B)Timer1.Interval=5
C)Timer.Interval=50 D)Timer1.Interval=500答案:
D
(8)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
StaticxAsInteger
Cls
Fori=1To2
y=y+x
x=x+2
Next
Printx,y
EndSub
程序运行后,连续三次单击Command1按钮后,窗体上显示的是
A)4 2 B)1218 C)1230 D)4 6答案:
B
9)以下关于多重窗体程序的叙述中,错误的是
A)用Hide方法不但可以隐藏窗体,而且能清除内存中的窗体
B)在多重窗体程序中,各窗体的菜单是彼此独立的
C)在多重窗体程序中,可以根据需要指定启动窗体
D)对于多重窗体程序中,而且单独保存每个窗体答案:
A
(10)以下关于文件的叙述中,错误的是
A)顺序文件中的记录一个接一个地顺序存放
B)随机文件中记录的长度是随机的
C)执行打开文件的命令后,自动生成一个文件指针
D)LOF函数返回给文件分配的字节数
答案:
B
(11)以下叙述中错误的是
A)事件过程是响应特定事件的一段程序
B)不同的对象可以具有相同名称的方法
C)对象的方法是执行指定操作的过程
D)对象事件的名称可以由编程者指定
答案:
D
(12)以下合法的VisualBasic标识符是
A)ForLoopB)ConstC)9abcD)a#x答案:
A
(13)当一个复选框被选中时,它的Value属性的值是
A)3 B)2C)1D)0
答案:
C
(14)表达式5Mod3+3\5*2的值是
A)0 B)2 C)4D)6
答案:
B
(15)设x=4,y=8,z=7,以下表达式的值是
x A)1 B)-1C)TrueD)False 答案: D (16)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: PrivateSubCommand1_Click() a$="VisualBasic" PrintString(3,a$) EndSub 程序运行后,单击命令按钮,在窗体上显示的内容是 A)VVVB)VisC)sicD)11 答案A (17)设有如下程序段: x=2 Fori=1To10Step2 x=x+i Next运行以上程序后,x的值是 A)26B)27C)38D)57答案: B (18)以下叙述中错误的是 A)在KeyPress事件过程中不能识别键盘的按下与释放 B)在KeyPress事件过程中不能识别回车键 C)在KeyDown和KeyUp事件过程中,将键盘输入的"A"和"a"视作相同的字母 D)在KeyDown和KeyUp事件过程中,从大键盘上输入的"1"和从右侧小键盘上输入的"1"被视作不同的字符 答案: B (19)执行如下两条语句,窗体上显示的是 a=9.8596 PrintFormat(a,"$00,00.00") A)0,009.86B)$9.86C)9.86D)$0,009.86 答案: D (20)在窗体上画一个名称为CommandDialog1的通用对话框,一个名称为Command1的命令按钮。 然后编写如下事件过程: PrivateSubCommand1_Click() CommonDialog1.FileName="" CommonDialog1.Filter="Allfile|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt" CommonDialog1.FilterIndex=2 CommonDialog1.DialogTitle="VBTest" CommonDialog1.Action=1 EndSub 对于这个程序,以下叙述中错误的是 A)该对话框被设置为“打开”对话框 B)在该对话框中指定的默认文件名为空 C)该对话框的标题为VBTest D)在该对话框中指定的默认文件类型为文本文件(*.Txt) 答案: D (21)设一个工程由两个窗体组成,其名称分别为Form1和Form2,在Form1上有一个名称为Command1的命令按钮。 窗体Form1的程序代码如下: PrivateSubCommand1_Click() DimaAsInteger a=10 Callg(Form2,a) EndSub PrivateSubg(fAsForm,xAsInteger) y=IIf(x>10,100,-100) f,Show f.Caption=y EndSub 运行以上程序,正确的结果是 A)Form1的Caption属性值为100 B)Form2的Caption属性值为-100 C)Form1的Caption属性值为-100D)Form2的Caption属性值为100 答案: B (22)在窗体上画一个名称为Command1的命令按钮,并编写如下程序: PrivateSubCommand1_Click() DimxAsInteger StaticyAsInteger x=10 y=5 Callf1(x,y) Printx,y EndSub PrivateSubf1(ByRefx1AsInteger,y1AsInteger) x1=x1+2 y1=y1+2 EndSub 程序运行后
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 全国 计算机等级考试 二级 VB 上机 试题 解析