首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有一个工程文件sjt2.vbp。窗体中含有除计时器外的其他控件,还有一个过程sub1,其功能是按照Text1中的通话时间计算通话费,并将其显示在Text2中。 程序运行时,单击“通话开始”按钮,则在Text1中累加通话时间(每隔1秒,文本框中的
考生文件夹下有一个工程文件sjt2.vbp。窗体中含有除计时器外的其他控件,还有一个过程sub1,其功能是按照Text1中的通话时间计算通话费,并将其显示在Text2中。 程序运行时,单击“通话开始”按钮,则在Text1中累加通话时间(每隔1秒,文本框中的
admin
2016-06-23
26
问题
考生文件夹下有一个工程文件sjt2.vbp。窗体中含有除计时器外的其他控件,还有一个过程sub1,其功能是按照Text1中的通话时间计算通话费,并将其显示在Text2中。
程序运行时,单击“通话开始”按钮,则在Text1中累加通话时间(每隔1秒,文本框中的数加1),单击“通话结束”按钮,则停止通话时间的累加;单击“计算通话费”按钮,则调用过程sub1。
要求:
①在窗体上画一个计时器,如图所示,并通过属性窗口设置适当属性。
②编写三个按钮的Click事件过程。
③编写计时器的事件过程。
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句,“计算通话费”按钮的事件过程中只允许调用过程sub1。不得修改已经存在的程序和控件属性,最后把文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:建立界面,设置计时器的Interval属性为1000,Enabled属性设置为False。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 参考代码 Private Sub Command1_Click() Timer1.Enabled=True’通话开始,Timer生效 End Sub Private Sub Command2_Click() Timer1.Enabled=False’通话结束,Timer失效 End Sub Private Sub Command3_Click() Call sub1’单击"计算通话费"按钮,调用sub1 End Sub Private Sub Timer1_Timer() Text1.Text=Text1.Text+1’将Text1中的数字间隔自增 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/DSLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
运行时,要使工具栏控件Toolbarl中的第二个按钮的按钮菜单中的第三项无效(变成灰色),应使用语句______。
声明一个变量为局部变量应该用
下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。PrivateSubCommand1_Click()DimxAsSingle x=InputBox("
下面叙述中不正确的是()。
inputBox函数返回值的类型为()。
设已经在菜单编辑器中设计了窗体的快捷菜单,某顶级菜单为a1,且取消其“可见”属性。运行时,以下()事件过程可以使快捷菜单的菜单项响应鼠标左键单击和右键单击。
在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是
如果不指明函数过程参数的类型,则该参数的数据类型为______。
以下能正确定义数据类型TelBook的代码是()。
随机试题
OnedaywhenIwashavingaheartylunchatafast-foodrestaurant,anoldcoupleentered.They【C1】______amealatthecount
肝硬化门静脉高压引起食管胃底静脉曲张有关的引流静脉有
什么是新产品?新产品的类型有哪些?
1840年鸦片战争后,中国社会逐步演变为
嗜铬细胞瘤的临床表现包括
患儿,10岁,半个月以来右下后牙自发痛,持续痛,不能咬物2日。检查:萌出2/3,无龋,叩痛(++)。松Ⅱ度,牙龈红肿。X线示髓角尖细,根发育畸形。病因可能是
以下关于子女对父母赡养义务的说法,错误的是()。
一位烟草制造商,他认为自己制造的香烟是不利于别人健康的,但为了自己生存他又不得不这么做,这是()。
11,12,16,39,67,122,()
费希纳设计的测量感觉阈限的方法包括
最新回复
(
0
)