首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下: Private Sub Timer1_Timer() Stmic f
窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下: Private Sub Timer1_Timer() Stmic f
admin
2020-07-22
40
问题
窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:
Private Sub Timer1_Timer()
Stmic flag As Integer
Ifflag=0 Then flag=1
flag=-flag
If flag=1 Then
Text1.ForeColor=&HFF& ’&HFF&为红色
Else
Text1.ForeColor=&HC000&’&HC000&为绿色
End If
End Sub
以下叙述中正确的是( )。
选项
A、每次执行此事件过程时,flag的初始值均为0
B、flag的值只可能取0或1
C、程序有逻辑错误,Else分支总也不能被执行
D、程序执行后,文本框中的文字每5秒改变一次颜色
答案
D
解析
计时器控件(Timer)用来完成有规律性时间间隔执行的任务,Interva1属性用于设置计时器事件之间的间隔,以毫秒为单位。
本题在每5秒执行一次的Timer事件过程中,通过静态变量flag值的交替变换(即-1和1之间)来控制文本框中文字的颜色,值为-1时为绿色,值为1时为红色。除程序刚启动第一次执行Timer事件过程时,静态变量flag的初始值为0外,其余各次均为-1或1。
转载请注明原文地址:https://kaotiyun.com/show/XtHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面关于多重窗体的叙述中,正确的是()。
在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示“打开”对话框时,希望茬该对话框的“文件类型”栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
设窗体名称为frmTest,为了在程序代码中将窗体的标题改为“等级考试”,其代码应该是
设窗体上有一个名称为Timer1的计时器控件,其Interval属性被设置为500,Enabled属性被设置为True;还有一个名称为Text1的文本框和下面的事件过程:PrivateSubTimer1_Timer()Sta
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:PrivateSubCommand1_Click() Dima(10)AsInteger,maxAsInteger Fork=1To10 a(k)=In
以下合法的VB变量名是
下列数据结构中,属于非线性结构的是( )。
设有如下程序:OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommand1_Click()’循环1Fori=1To3
随机试题
患儿女性,7岁,发热3天,伴咳嗽。体格检查:体温39.4℃,血压115/75mmHg;呼吸尚平稳,右下肺呼吸音减低,叩诊浊音,语音震颤增强,有管状呼吸音,右肺底可闻细小水泡音,左肺呼吸音正常;心脏(-),腹部(-)。此时应该换用的抗生素为
患者手握哑铃主动伸展肘关节,对于肱二头肌肌力训练属于
取某生物碱类药物约10mg,加发烟硝酸5滴置水浴上蒸干,得黄色残渣放冷,加乙醇2~3滴湿润,加固体氢氧化钾一小粒,即显深紫色。该药物是
无缝线路的锁定轨温是指()。
与普通的保障型保险产品相比,投资型保险产品具有的特点包括()。
在业主转让物业房屋所有权时,专项维修资金结余资金()。
Policemen【K1】______(call)byashopinSouthernearlyonChristmasmorning.Whenthey【K2】_______(arrive)theyfoundtwoburglars(
行政监察机关对公安机关及其人民警察的监督,属于()。
“出淤泥而不染,濯清涟而不妖”,荷花的圣洁已经被人们称颂了近千年之久。现在,科学家们终于发现了荷叶一尘不染的秘密。这一发现不但令人们感叹大自然的精妙构思,还给材料科学家带来启发。一场自清洁材料的革命因此揭开了序幕,有望使人们摆脱污渍的烦恼。20世纪
Increasingly,overthepasttenyears,people—especiallyyoungpeople—havebecomeawareoftheneedtochangetheireatinghabit
最新回复
(
0
)