首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下: Private Sub Timer1_Timer() Static
窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下: Private Sub Timer1_Timer() Static
admin
2017-11-27
74
问题
窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:
Private Sub Timer1_Timer()
Static flag As Integer
If flag=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)用来完成有规律性时间间隔执行的任务,Interval属性用于设置计时器事件之间的间隔,以毫秒为单位。
本题在每5秒执行一次的Timer事件过程中,通过静态变量flag值的交替变换(即-1和1之间)来控制文本框中文字的颜色,值为-1时为绿色,值为1时为红色。除程序刚启动第一次执行Timer事件过程时,静态变量flag的初始值为0外,其余各次均为-1或1。
转载请注明原文地址:https://kaotiyun.com/show/1wGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为______。I=0ForG=10To19Step3I=I+1NextGPrintI
下列程序段的执行结果为()。a=1b=5Doa=a+bb=b+1LoopWhilea<10Printa;b
阅读如下程序;PrivateSubFormClick()msg1$=“继续吗?”msg2$=“操作对话框”r=MsgBox(msg1$,vbYesNoOrvbDefaultButton2,msg2$
数据流图的类型有______和事务型。
以下程序段运行的结果是______。Dima(-1To5)AsBooleanDimflagAsBooleanflag=FalseDimiAsIntegerDimjAsIntegerD
在运行程序时,在文本框中输入新的内容,或在程序代码中改变Text的属性值,相应会触发到
下列叙述菜单设计的语句正确的是()。
要使文本框可输入多行文字,要更改的默认选项是
语句:PrintInt(Rnd*5+20)的输出不可能是
8.6787E+8写成普通的十进制数是()。
随机试题
根据我国《宪法》和法律,下列关于人民检察院的表述,正确的是()
某区房产管理局向郭某发放了一份房屋产权证书,郭某系房屋产权人。李某知道此事后非常气愤,声称自己几年前就从该区房产管理局领到了所涉房产的产权证书。因交涉没有结果,李某遂以房屋产权人的名义向区政府申请复议,请求撤销区房产管理局向郭某发放的房屋产权证书。经复议审
中国居民张某2019年收入如下:(1)张某2019年1月初领取个体户营业执照,经营汽车零件加工,当年取得生产经营收入100万元,生产经营成本为48万元,含独生女儿的生活费支出8万元、从业人员工资8万元、张某本人的工资12万元、生产经营和家庭生活难
国有大型企业集团公司(以下简称A公司)为加强内部控制建设,专门成立内部控制评价机构,负责内部控制评价的具体组织实施工作。该公司在设置内部控制评价机构的基础上,还成立专门的评价工作组,接受内部控制评价机构的领导,具体承担内部控制评价工作的组织。评价工作组成员
【2013年烟台莱州市真题】班级授课制中的教学工作设计环节主要包括()。
以下几种说法,正确的是()
我国刑法对未成年人违法犯罪的处理有以下特殊规定()。
f(x)=∫x1cost2dt在区间[0,1]上的平均值为________.
在循环双链表的p结点之后插入s结点的操作是______。
若查找某个字段中以字母A开头且以字母Z结尾的所有记录,则条件表达式应设置为
最新回复
(
0
)