首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1) 在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个图片框?名称分别为P1和P2,其中的图片分别是一个航天器和一朵云,还有一个计时器控件,名称为Timer1,一个命
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1) 在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个图片框?名称分别为P1和P2,其中的图片分别是一个航天器和一朵云,还有一个计时器控件,名称为Timer1,一个命
admin
2009-02-25
42
问题
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。
(1) 在考生文件夹下有一个工程文件sjt3.vbp,窗体中有两个图片框?名称分别为P1和P2,其中的图片分别是一个航天器和一朵云,还有一个计时器控件,名称为Timer1,一个命令按钮,名称为C1,标题为“发射”。窗体文件中给出了两个事件过程,但并不完整,要求:设置计时器控件的属性,使其在初始状态下不计时;设置计时器的属性,使其每隔0.1秒调用Timer事件过程一次。
去掉程序中的注释符,把程序中的?改为正确的内容,使得在运行时单击“发射”按钮,则航天飞机每隔0.1秒向上移动一次,当到达P2的下方时停止移动。程序运行界面如图20-3所示。
注意:不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2) 在考生文件夹下有一个工程文件sjt4.vbp,窗体上已经有两个文本框,名称分别为Text1和Text2;一个命令按钮,名称为C1,标题为“确定”。请画两个单选按钮,名称分别为Op1和Op2,标题分别为“男生”和“女生”;再画两个复选框,名称分别为Ch1和Ch2,标题分别为“体育”和“音乐”。请编写适当的事件过程,使得在运行时,单击“确定”按钮后实现下面的要求:
根据选中的单选按钮,在Text1中显示“我是男生”或“我是女生”;根据选中的复选框,在Text2中显示“我的爱好是体育”或“我的爱好是音乐”或“我的爱好是体育音乐”。程序运行界面如图20-4所示。
注意:不得修改已经给出的程序和已有控件的属性。在结束程序运行之前,必须选中一个单选按钮和至少一个复选框,并单击“确定”按钮。必须使用窗体右上角的关闭按钮结束程序,否则无成绩。
选项
答案
控件已经建立完好,只需设计事件过程即可。 Timer1控件的Interval属性是用来控制计时器事件发生的时间间隔,通过题意可知该属性设置为100(Interval是以毫秒为单位)。当单击“发射”按钮时开始计时,把计时器控件的Enabled属性设置为True。如果使航天器即P1停止移动,需要将计时器控件的Enagled属性设置为False。解题步骤: 第一步:建立界面并设置控件属性。程序用到的控件及其属性见表20-3。 [*] 第二步:编写程序代码。 程序提供的代码: Private Sub C1_Click() ’ Timer1.Enabled= End Sub Private Sub Timer1_Timer() Static a% a=a+1 ’ If P1.Top>P2.Top+P2.? Then P1.Move P1.Left, P1.Top-5-a, P1.Width, P1.Height Else ’ Timer1.?=False End If End Sub 参考代码: Private Sub C1_Click() Timer1.Enabled=True End Sub Private Sub Timer1_Timer() Static a% a=a+1 If P1.Top>P2.Top+P2.Height Then P1.Move P1.Left, P1.Top-5-a, P1.Width, P1.Height Else Timer1.Enabled=False End If End Sub 第三步:调试并运行程序。 第四步:按题目要求存盘。 (2)在窗体上建立好控件后,先设置控件属性,再编写事件过程。 在文本框里显示的内容通过文本框的Text属性设置。Value属性用来表示复选框后单选框的状态。对于单选框来说,Value属性可设置为True或False当设置为True时,该单选按钮是被选中的,否则该单选按钮没有被选中。对于复选框来说,Value属性可以设置为0、1或2。其中:0—表示没有选中该复选框;1—表示选中该复选框;2—表示该复选框被禁止(灰色)。解题步骤: 第一步:建立界面并设置控件属性。程序中用到的控件及其属性见表20-4。 [*] 第二步:编写程序代码。 参考代码: 程序提供的代码: Private Sub Form_Unload(Cancel As Integer) Open "out4.txt" For Output As #1 Print #1, Op1.Value, Op2.Value, Text1.Text Print #1, Ch1.Value, Ch2.Value, Text2.Text Close #1 End Sub 参考代码: Private Sub C1_Click() If Op1.Value Then Text1.Text="我是" & Op1.Caption Else Text1.Text="我市" & Op2.Caption End If Text2.Text="我的爱好是" If Ch1.Value=1 Then Text2.Text=Text2.Text & Ch1.Caption End If If Ch2.Value=1 Then Text2.Text=Text2.Text & Ch2.Caption End If End Sub Private Sub Form Unload(Cancel As Integer) Open "out4.txt" For Output As #1 Print #1, Op1.Value, Op2.Value, Text1.Text Print #1, Ch1.Value, Ch2.Value, Text2.Text Close #1 End Sub 第三步:调试并运行程序。 第四步:按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/Zh1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
结构化设计方法(SD)与结构化分析方法(SA)一样,遵循______模型,采用逐步求精技术,SD方法通常与SA相联,即依据数据流图设计程序的结构。
下面程序段的输出结果是【】。publicclassTest{publicstaticvoidmain(Stringargs[]){inti=1;switch(i){case
下面程序的正确输出是()。publicclassHello{publicstaticvoidmain(Stringargs[]){intcount,xPos=25;
以下各选项中能正确声明一个表示50个值为null的字符串数组的是()。
在编写Java程序的时候,如果不为类的成员变量定义初始值,Java会给它们设置默认值,下列说法中不正确的是()。
在下面的代码段中填入一个适当的语句,表示从输入流中能读取对象(注:FileInputStream的形象为theTime)。FileInputStreamin=【】;ObjectInputStreams=ObjectInputStr
在面向对象方法中,类之间共享属性和操作的机制称为【】。
下列Applet在窗口中放置一个按钮,并用这个按钮控制弹出窗口的显示和隐藏。请在横线处填写正确的程序。importjava.applet.Applet;importjava.awt.*;importjava.awt.even
使用()方法可以将JMenuBar对象设置为主菜单。
Mid("HelloEveryone",7,3)的执行结果是
随机试题
51.根据现行国家标准《建筑内部装修设计防火规范》(GB50222),下列装修装饰材料中,不属于其他装修装饰材料的是()。
无牙牙合患者修复前做牙槽嵴修整的主要目的是
产后10天,左乳胀痛发热。查体:体温38.7℃,左乳外上象限皮温度,红肿有压痛,肿块约5cmx5cm大小,中心有波动感。最恰当的治疗方法是
施工安全管理体系遵循PDCA循环模式运行,是一个( )。
一大型铁路工程招标要求投标企业具有铁路施工总承包特级资质,某具有铁路施工总承包一级资质施工企业(代号X)借用具有投标资格的A集团公司之名参与投标,并联合参与投标的B、C、D集团公司统一报价后A集团公司中标,X企业自行组织项目部进场施工并向A集团公司支付了一
导游员要做到有针对性的讲解,必须注意研究客人的心理,集中精力对客人的需求做出准确的判断,在讲解之前做到心中有数,有备而讲。()
民航规定出售儿童半价票的年龄为()。
在一个单CPU的计算机系统中,有两台外部设备R1、R2和三个进程P1、P2、P3。系统采用可剥夺式优先级的进程调度方案,且所有进程可以并行使用I/O设备,三个进程的优先级、使用设备的先后顺序和占用设备时间如下表所示:假设操作系统的开销忽略不计,三个进程
TheLandofDisneyPredictingthefutureisalwaysrisky.Butit’sprobablysafetosaythatatleastafewhistorianswill
A、Tomorrow.B、Today.C、Yesterday.D、Thedayaftertomorrow.A对话结尾部分女士说这样的优惠很具有吸引力,男士说这次促销活动明天就结束了。由此可见,促销的结束时间是明天。
最新回复
(
0
)