首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是( )。
设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是( )。
admin
2015-10-23
47
问题
设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是( )。
选项
A、Private Sub Timer1_Timer()
Label1.Caption=True
End Sub
B、Private Sub Timer1_Timer()
Label1.Caption=Time$
End Sub
C、Private Sub Timer1_Timer()
Label1.Interval=1
End Sub
D、Private Sub Timer1_Timer()
For k=1 To Timer1.Interval
Label1.Caption=Timer
Next k
End Sub
答案
B
解析
Timer1的Interval属性值是1000,Enabled属性为True,说明定时器开始工作,每隔1000毫秒(即1秒)触发一次Timer事件,从而执行一次Timer事件过程。要想每秒在标签中显示一次系统时间,则在Timer事件过程中把系统时间赋给标签的Caption属性就能实现。故选B。
转载请注明原文地址:https://kaotiyun.com/show/tWLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
PrivateSubForm_Activate()Forj=1to3x=3Fori=1to2x=x+6NextNextPrintxEndSub程序运行后,窗体上显示的结果为【
下列程序功能是,产生10个0100的随机数,输出其中的最大值。请将程序补充完整。PrivateSubForm_Click()Diman(10)AsIntegerDimmaxAsIntegerRandomizeFori%
以下定义数组或给数组元素赋值的语句中,正确的是()。
下面程序是用来打印九九乘法表的,请填空。DimiAsInteger,jAsInteger,Str1$Str1=""Fori=1To9Forj=1To9If【】ThenStr1=Str1+Str$(
阅读下面的程序段:Fora=1To2Forb=1ToaForc=bTo2i=i+1NextNextNextPrinti执行上面的3重循环后,i的值为
设用复制、粘贴的方法建立了一个命令按钮数组Commandl,以下对该数组的说法错误的是
以下合法的变量名是
设A=2,B=-2,则表达式A/2+1>B+5OrB*(-2)=6的值是______。
设一棵完全二叉树共有700个结点,则在该二叉树中有【】个叶子结点。
如果在立即窗口中执行以下操作,则输出结果是()。a=8<CR>b=9<CR>Printa>b<CR>
随机试题
肝郁气滞而致缺乳,在乳根、膻中、少泽方基础上加
患者,女性,27岁,车祸致脾破裂。查体:血压55/31mmHg,脉率122/分,患者烦躁不安、皮肤苍白、四肢湿冷。护士给予患者的护理措施应除外
下列关于等额本息还款法、等额本金还款法两种还款方式的说法,错误的是( )。
泰山铜亭是中国目前仅存的三大铜亭之一。()
培训需求的组织分析是通过对组织的______因素的分析,准确地找出组织存在的问题与问题产生的根源。
如图所示,当开关S闭合,甲、乙两表为电压表时,两表读数之比U甲:U乙为4:1;当开关S断开,甲、乙两表为电流表时,两表的读数之比I甲:I乙为:()。
单位来了不少新员工,因为与老同志缺乏交流而关系一般。如果让你组织一场联欢会,你怎么组织?
甲、乙双方约定,由丙每月代乙向甲偿还债务500元,期限2年。丙履行5个月后,以自己并不对甲负有债务为由拒绝继续履行。甲遂向法院起诉,要求乙、丙承担违约责任。法院应()。
KeithHewson,a29-year-oldairlinepilot,hadn’tplannedtolivewithhisin-lawsafterhegotmarried.Buthequicklyrealized
Howwillthemangooutingthisweekend?
最新回复
(
0
)