首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sj5.Vbp,在Forml的窗体中画一个标签,3个命令按钮和一个计时器。要求程序运行时,单击“开始计数”按钮,就开始计数,每隔1秒,标签中的数加_1.单击“暂停计数”按钮,则停止计数;单击“停止计数”按钮,则标签中的计数变为0
在考生文件夹下有一个工程文件sj5.Vbp,在Forml的窗体中画一个标签,3个命令按钮和一个计时器。要求程序运行时,单击“开始计数”按钮,就开始计数,每隔1秒,标签中的数加_1.单击“暂停计数”按钮,则停止计数;单击“停止计数”按钮,则标签中的计数变为0
admin
2010-07-13
37
问题
在考生文件夹下有一个工程文件sj5.Vbp,在Forml的窗体中画一个标签,3个命令按钮和一个计时器。要求程序运行时,单击“开始计数”按钮,就开始计数,每隔1秒,标签中的数加_1.单击“暂停计数”按钮,则停止计数;单击“停止计数”按钮,则标签中的计数变为0。程序运行时的窗体界面如图12—5所示。
注意:修改适当的控件属性,并去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件以原来的文件名存盘。
选项
答案
根据题意,将一个标签,一个计时控件和3个命令按钮添加到窗体中,标签的名称为Labell,Caption属性为0,Timer的名称为Timer1,命令按钮的属性分别为Command1、Command2和Command3,Caption属性分别为“开始计数”“暂停计数”和“停止计数”。双击Commandl进入代码窗口,编写如下代码: Private Sub Commandl Click() Timer1.
Interva1
=1000 ’按开始按键,将把Timerl的间隔设为1秒 End Sub Private Sub Command2 Click() Timer1.
Interva1
=0’按停止按键,将把Timerl的间隔设为0 End Sub Private Sub Command3_Click() Timerl.
Interval
=0 ’按停止按键,将把Timerl的间隔设为0 Labell.
Caption
="0"’将Labell初始化为0 End Sub Private Sub Timerl_Timer() Labell.
Caption
=Val(Labell.
Caption
)+1 ’每过一个周期,Label1的数字加1 End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/rLmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面代码段的输出是()。if(5&7)0&&5|2)system.out.println("true");
最常用的一种基本数据模型是关系数据模型,它的表示应采用()。
下面选项中不属于简单数据类型的是( )。
使用如下( )保留字可以使只有在该类的包中的其他类才能访问该类。
在计算机中,算法是指( )。
数据字典是各类数据描述的集合,它通常包括5个部分,即数据项、数据结构、数据流、【】和处理过程。
下列选项中不属于结构化程序设计方法的是( )。
在文件类提供的方法中,用于创建目录的方法是( )。
现有一个整型数组a[4],它的所有数组元素为( )。
随机试题
DaydreamingI.DaydreamingcanbeharmfulbecauseitwasconsideredasA.awasteof【T1】______B.a【T2】______ofneur
—Ican’tthankyoutoomuch,MissJames.Whatyoudidhelpedmealot.—________,Carlos.
简述学校产生的条件。
引起胆囊收缩最重要的体液因素是
房地产周围安放的东西是否杂乱,如电线杆、广告牌,标示牌等的树立状态和设计是否美观,建筑物之间是否协调,公园、绿化等形成的景观是否赏心悦目,都对房地产价格有影响。()
某总承包单位将一医院的通风空调工程分包给某安装单位,工程内容有风系统、水系统和冷热(媒)设备。设备有7台风冷式热泵机组,9台水泵,123台吸顶式新风空调机组,1237台风机盘管,42台排风机,均由业主采购。通风空调工程的电气系统由总承包单位施工。通风空调设
李某为M公司经理,个人所得税由公司代扣代缴,2007年1月份税款为125元,公司代扣税款时应作如下会计处理( )。
科技创新可以分为()三种类型。
求
Consideringhowmuchhangoverscostcountriesandcompanies,nottomentionthepainpeoplesuffer,youwouldthinksomeonewoul
最新回复
(
0
)