首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Text1的文本框,1个名称为Timer1的计时器,且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是,单击窗体,则每隔2秒钟在Text1中显示一次当前时间。 Priva
窗体上有1个名称为Text1的文本框,1个名称为Timer1的计时器,且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是,单击窗体,则每隔2秒钟在Text1中显示一次当前时间。 Priva
admin
2019-06-20
57
问题
窗体上有1个名称为Text1的文本框,1个名称为Timer1的计时器,且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是,单击窗体,则每隔2秒钟在Text1中显示一次当前时间。
Private Sub Form_Click()
Timer1.
End Sub
Private Sub Timer1_Timer()
Text1.Text=Time()
End Sub
为了实现上述功能,应该在横线处填入的内容为( )。
选项
A、Enabled=True
B、Enabled=False
C、Visible=True
D、Visible=False
答案
A
解析
计时器控件的Interval属性设置为2000,说明计时器事件发生的间隔是2秒,Enable属性设置为False则说明计时器没有激活。根据程序功能,需要在单击窗体时激活计时器,即在窗体单击事件中设置计时器的Enable属性值为True,即Timer1.Enable=True。
转载请注明原文地址:https://kaotiyun.com/show/eMUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm_Load()Shape1.Top=0:Timer1.Interval=100End
下列控件中,不响应Click事件的是
窗体上有名称为List1的列表框。以下能够将列表框当前选定的列表项替换为字符串“Basic”的语句是
设窗体上有名称为Option1的单选按钮,且程序中有语句:IfOption1.Value=TrueThen下面语句中与该语句不等价的是
以下叙述中错误的是
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Text1;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图2.20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
要使菜单项MenuOne在程序运行时失效,应使用的语句是()。
以下关于控件数组的叙述中,错误的是
在关系模型中,每一个二维表称为一个
下列对于软件测试的描述正确的是
随机试题
Yourtieis______tooexpensive.
腹水量超过多少毫升时,体检可发现移动性浊音
患者男,78岁,平素体弱多病,突见冷汗淋漓、肌肤手足逆冷、精神疲惫、神情淡漠、脉微欲绝等症状。患者的目前的病机为()。
资本主义银行发展过程中首先产生的是()。
Therequirementsforhighschoolgraduationhavejustchangedinmycommunity.Asaresult,allstudentsmust【C1】______sixtyhou
老舍的《茶馆》是新中国戏剧的经典之作。()
小王围着人工湖跑步,跑第二圈用时是第一圈的两倍,是第三圈的一半,三圈共用时35分钟。如小王跑第四圈和第五圈的时间分别是上一圈的一半,则他跑完5圈后,平均每圈的用时为多少分钟?
生命存在的首要条件是液态水,一颗行星是否宜居取决于表面温度能否维持液态水的存在。冰行星或冰卫星地表原本被冰雪覆盖,此前研究认为,随着恒星辐射增强,其地表冰雪最终会融化形成液态水,从而适宜生命生存。不过,最新研究证明,随着恒星辐射增强,冰行星或冰卫星将直接进
AHeroicWomanThewholeoftheUnitedStatescheereditslatesthero,AshleySmith,withtheFederalBureauofinvestigati
Regulatedchangeisoftenareactiontoaproblem______thehumanbodyreactstocertaininfectionsbyraisingitstemperature.
最新回复
(
0
)