首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体中绘制一个名称为Labell的标签,其标题为空,BorderStyle属性为1;再添加一个名称为Timer1的计时器。请设置适当的控件属性,并编写适当的事件过程,使得运行时,标签中的数字每隔1秒钟加2。程序运行效果如图1-1所
(1)在名称为Form1的窗体中绘制一个名称为Labell的标签,其标题为空,BorderStyle属性为1;再添加一个名称为Timer1的计时器。请设置适当的控件属性,并编写适当的事件过程,使得运行时,标签中的数字每隔1秒钟加2。程序运行效果如图1-1所
admin
2009-03-26
32
问题
(1)在名称为Form1的窗体中绘制一个名称为Labell的标签,其标题为空,BorderStyle属性为1;再添加一个名称为Timer1的计时器。请设置适当的控件属性,并编写适当的事件过程,使得运行时,标签中的数字每隔1秒钟加2。程序运行效果如图1-1所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sj1.vbp,窗体文件名为sj1.frm。
(2)在窗体上设置一个文本框,名称为Text1,再添加一个命令按钮,名称为Commandl,标题为“当前时间/日期切换“;每次单击按钮时,Text1就显示出当前时间,再单击一次,Text1就显示当前日期。请编写相应的程序代码来完成这个功能。程序运行时的窗体界面如图1-2所示。
注意:要求考生在编写完程序后,把工程文件与窗体文件保存到考生文件夹下,文件名分别为sj2.vbp与sj2.frm。
选项
答案
(1)计时器的Interval属性用于设置每次触发计时器的Timer事件的时间间隔,单位为毫秒。Enabled属性控制计时器是否开始启用,True表示启用,False表示不启用。 根据题意,新建“标准EXE”工程,将一个标签和一个计时器控件添加到窗体中,标签的名称为Labell、Caption属性为“0”,Timer的名称为Timerl、Interval属性为“1000”。设置完成后双击Commandl进入代码窗口,编写如下代码: Private Sub Timer1_Timer() Labell.Caption=Val(Labell.Caption)+2 ’每过一个间隔计数加2 End Sub 单击[*]按钮运行程序,并按要求保存。 (2)根据题意,新建“标准EXE”工程,将一个文本框控件和一个命令按钮添加到窗体中.文本框的名称为Text1、Text属性为空,命令按钮的名称为Command1、Caption属性为“当前时间/日期切换”。双击Commandl进入代码窗口,编写如下代码: Dim i As Integer Private Sub Commandl_Click() If i=0 Then Text1.Text=Date i=1’显示标识,1表示显示的是日期 Else Text1.Text=Time i=0’0表示显示的是时间 End If End Sub Private Sub Form_Load() Text1.Text=Time i=0 End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/ZV1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在编写JavaApplet程序时,若需要对发生的事件作出响应和处理,一般需要在程序的开头写上()语句。
下面程序的输出结果是()。publicclassSun{publicstaticvoidmain(Stringargs[]){inti=9;switc
查看Applet效果有两种方式,分别是:【】和支持Applet的浏览器。
用来导入已定义好的类或包的语句是()。
下列关于小应用程序说法错误的是()
下面______组件可以不添加到容器中。
强行排错法涉及的调试技术主要是【】和监视表达式。
char类型的取值范围是()。
int类型的取值范围为
随机试题
影响肾小球滤过的因素有_______、_______和_______。
A.热因热用B.寒因寒用C.塞因塞用D.通因通用E.热者寒之
肝硬化患者出现肝掌、蜘蛛痣、男性乳房发育的主要原因是()
信用交易证券交收账户,用于记录客户委托证券公司持有、担保证券公司因向客户融资融券所生债权的证券。()
推销观念和营销观念的区别有()。
在其他因素不变的情况下,依据存货陆续供应和使用模型,下列措施中,导致最佳订货次数减少的有()。
下列哪些说法是正确的?()
行政诉讼中,被诉行政机关负责人应当出庭应诉。不能出庭的,则()。
peopleuseittoputsomethingintheplacewherepeoplecantakeplane
A、GreenEggsandHam.B、ToKillAMockingbird.C、OfMiceandMen.D、AChildCalled"It".A“一年级小学生最喜欢读的是哪本书?”Thebookreadmosto
最新回复
(
0
)