首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Text1的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下: Private Sub Timerl_Timer() Static flag As
窗体上有1个名称为Text1的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下: Private Sub Timerl_Timer() Static flag As
admin
2019-04-29
60
问题
窗体上有1个名称为Text1的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:
Private Sub Timerl_Timer()
Static flag As Integer
Ifflag=0 Then
flag=1:flag=-flag
End If
Ifflag=1 Then
Text1.ForeColor=&HFF&’&HFF&为红色
Else
Text1.ForeColor=&HC000&’&HC000
选项
A、每次执行此事件过程时,flag的初始值均为0
B、flag的值只可能取0或1
C、程序执行后,文本框中的文字每5秒改变一次颜色
D、程序有逻辑错误,Else分支总也不能被执行
答案
C
解析
计时器控件(Timer)用来完成有规律性时间间隔执行的任务,Interval属性用于设置计时器事件之间的间隔,以毫秒为单位。本题在每5秒执行一次的Timer事件过程中,通过静态变量flag值的交替变换(即-1和l之间)来控制文本框中文字的颜色,值为一1时为绿色,值为1时为红色。除程序刚启动第一次执行Timer事件过程时,静态变量flag的初始值为0外,其余各次均为-1或1。
转载请注明原文地址:https://kaotiyun.com/show/J2Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有名称为Commandl的命令按钮,其事件过程如下:OptionBase1PrivateSubCommand1Cliek()DimaDimb(10)AsIntegera=Array(2,4,7,3,9,6)Fori=L
有下面程序代码:PrivateSubCommandl—Click()a=Array(1,2,3,4,5,6,7,8,9,10)n=UBound(a)Fork=0ToUBound(a)/2Printa(k)*a(n);n=11-lNextk
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:PrivateSubCommand1_Cliek()Dimn()AsintegerDima,bAsIntegera=InputBox(“Enterthef
下面属于白盒测试方法的是
在软件设计中,不属于过程设计工具的是
下面叙述中错误的是
设变量x中的值是395,则下面语句的输出是Printx\100+((XMod100)\10)*10+(xMod10)*100
要求如果x被7,除余2,则输出x的值,下列语句中不能实现此功能的语句是
随机试题
Thesightofeightlongblacklegsmovingoverthefloormakessomepeoplescreamandrun—andwomenarefourtimesmorelikelyt
男性,62岁,心悸、手抖1年,加重半个月。查体:T37.5℃,P95次/分,R20次/分,BP150/70mmHg,消瘦,皮肤潮湿,甲状腺I度肿大,可闻及血管杂音,颈静脉无怒张,双肺呼吸音清,心界不大,心率114次/分,心律绝对不齐,心音强弱不等,腹
能够诱发药疹最多见的药物是
有一个颊沟的牙为()
患者,男,30岁。高热寒战2天,胸痛,伴咳嗽,痰中带血。听诊:右肺中部可闻及湿哕音。应首先考虑的是()
容易引起免疫耐受的抗原注射途径为
中国甲公司与美国乙公司签订了一份买卖家具的合同,价格条件是CIF纽约,合同中约定的装船时间是2000年9月1日以前。由于甲公司的过失,货物在规定的日期之后才装船完毕,在甲公司出具保函的情况下,承运人丙公司签发了注明9月1日装船的清洁提单,提单上注明适用《海
王先生已申请并获得2年期个人信用贷款.因近期资金紧张、还款压力过大,拟向银行申请展期,按规定展期期限最长可达()。
企业是产品生产过程中的主要组织形式,典型的形式主要包括()。
"Hithere.How’sitgoing?""Oh,fine.Fine.Howaboutthisweather,huh?""Well,Iguesswecanalwaysusetherain."
最新回复
(
0
)