首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有一个工程文件sjt2.vbp。窗体中含有除计时器外的其他控件,还有一个过程subl,其功能是按照Textl中的通话时间计算通话费,并将其显示在Text2中。 程序运行时,单击“通话开始”按钮,则在Textl中累加通话时间(每隔1秒,文
考生文件夹下有一个工程文件sjt2.vbp。窗体中含有除计时器外的其他控件,还有一个过程subl,其功能是按照Textl中的通话时间计算通话费,并将其显示在Text2中。 程序运行时,单击“通话开始”按钮,则在Textl中累加通话时间(每隔1秒,文
admin
2020-04-08
81
问题
考生文件夹下有一个工程文件sjt2.vbp。窗体中含有除计时器外的其他控件,还有一个过程subl,其功能是按照Textl中的通话时间计算通话费,并将其显示在Text2中。
程序运行时,单击“通话开始”按钮,则在Textl中累加通话时间(每隔1秒,文本框中的数加1),单击“通话结束”按钮,则停止通话时间的累加;单击“计算通话费”按钮,则调用过程subl。
要求:
①在窗体上画一个计时器,如图所示,并通过属性窗口设置适当属性。
②编写三个按钮的Click事件过程。
③编写计时器的事件过程。
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句,“计算通话费”按钮的事件过程中只允许调用过程subl。不得修改已经存在的程序和控件属性,最后把文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:建立界面,设置计时器的Interval属性为1000,Enabled属性设置为False。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 参考答案 Private Sub Commandl_Click() Timerl.Enabled=True′通话开始,Timer生效 End Sub Private Sub Command2_Click() Timerl.Enabled=False′通话结束.Timer失效 End Sub PrlVate sub COhmland3_Click() Call subl′单击"计算通话费"按钮,调用subl End Sub PriVate sub Timerl_Timer() Textl.Text =Textl.Text +1′将Textl中的数字间隔自增 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
程序运行时,单击“通话开始”按钮,Timerl的Enabled属性设置为True,运用Timerl_Timer事件过程中的Textl.Text=Textl.Text+l语句,在Textl中累加通话时间(每秒加1),单击“通话结束”按钮,Timerl的Enabled属性为False,停止通话时间的累加;单击“计算通话费”按钮,运用Call语句调用过程subl。
转载请注明原文地址:https://kaotiyun.com/show/hATp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为( )。
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommand1Click()Dima&,s&,k&s=1a=2Fork=
设在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelNumAsString*20EndType在窗体上画一个名为Commandl的命令按钮,要求当执行
下面是求最大公约数的函数的首部:Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是()。
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是()。
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
支持子程序调用的数据结构是( )。
窗体上有名称为Commandl的命令按钮和名称为Text1的文本框PrivateSubCommandl一Click()Text1.Text=“程序设计”Text1.SetFocusEndSubPriv
VB中有这样一类文件:该文件不属于任何一个窗体,而且仅包含程序代码,这类文件的扩展名是()。
随机试题
下列句子有无歧义?如果有,请分析歧义产生的原因。没有不想去的。
ThewaypeopleintheUStraveltoandfromworkhaschangedalotinthelastfiftyyears.【T1】BeforetheSecondWorldWar,most
男性,72岁,突然昏厥,急诊心电图检查如下图,诊断为:()
33岁男子,自述胸闷、心悸,时有胸痛。体检:心界不大,心尖部第一心音不弱,可闻第四心音,胸骨左缘3、4肋问可闻收缩期粗糙喷射性杂音。心电图示:V3~V4T波倒置1年后患者症状加重伴头晕再次来诊,除治疗外,家属询问可能发生的最严重情况是
采用新结构、新材料、新工艺的建设工程和特殊结构的建设工程,设计单位应当在设计中提出( )。
甲公司为上市公司,其2013年度财务报告于2014年3月1日对外报出。该公司在2013年12月31日有一项未决诉讼,经咨询律师,估计很可能败诉并预计将支付的赔偿金额、诉讼费等在760万元至1000万元之间(其中诉讼费为7万元)。为此,甲公司预计了880万元
期刊变更()等要向所在地省级新闻出版行政主管部门备案。
教育申诉制度的性质是属于()。
闪购模式即是以互联网为媒介,以限时特卖的形式,定期定时推出国际知名品牌的商品,一般以原价1~5折的价格供专属会员限时抢购,先到先买,限时限量,售完即止。根据上述定义,下列属于闪购的是:
设在采用SQLServer2008数据库的图书馆应用系统中有三个基本表,表结构如下所示,请用SQL语句完成下列两个查询:BORROWER:借书证号姓名系名班级12011106蒋辉文
最新回复
(
0
)