首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有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
2018-12-20
136
问题
窗体上有1个名称为Text1的文本框;1个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:
Private Sub Timer1_Timer()
Static flag As Integer
Ifflag=0 Then flag=1
flag=-flag
Ifflag=l 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/w5Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click() DimiAsInteger,jAsInteger n=InputBox("输入一个大于1的正整数") Fori=2Ton Forj=2To
设窗体上有一个Command1命令按钮,还有以下程序代码:PrivateSubCommand1_Click()StaticxAsIntegerx=x+1Callproc(x)Printx,E
数据字典(DD)所定义的对象都包含于
阅读程序:PrivateSubForm_Click() a=0 Forj=1To15 a=a+jMod3 Nextj PrintaEndSub程序运行后,单击窗体,输出结果是( )。
窗体上有一个名称为CD1的通用对话框,一个名称为Command1的命令按钮,相应的事件过程如下:PrivateSubCommand1_Click() CD1.Filter="AllFile|*.*|TextFile|*.txt|PPT|*.p
要使两个单选按钮属于同一个框架,下面三种操作方法中正确的是( )。①先画一个框架,再在框架中画两个单选按钮②先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中③先画两个单选按钮,再画框架将单选按钮框起来
下面属于白盒测试方法的是
设二叉树中共有15个结点,其中的结点值互不相同。如果该二叉树的前序序列与中序序列相同,则该二叉树的深度为
随机试题
消化性溃疡的症状和腹痛是胃泌素瘤最常见的症状。改为:
残气/肺总量之比增加不见于哪种情况
A.生麻黄B.蜜麻黄C.麻黄绒D.蜜麻黄绒E.醋麻黄适用于表证已解而喘咳未愈的老人、幼儿及体虚患者的是
患者,男,65岁。上颌无牙,下颌牙均健康,多次修复上半口义齿,但仍多次折断,现要求重新修复,医师设计金属基托式上半口义齿。医师取印模、取咬合关系,上架采用下述哪种金属制作该基托为最轻
建筑物内燃气锅炉房的门应采用()。
下列选项中,不属于一价定律实现条件的是( )。
根据税务登记相关规定,下列选项中需要办理变更税务登记的有()。
科学家认为,海洋对大气中二氧化碳的吸收暂时缓解了二氧化碳浓度的上升速度,一旦这种缓解作用失效,大气中二氧化碳的浓度将以更快速度增长。那么,增加的二氧化碳是否会导致大气温度上升呢?虽然绝大部分科学家相信答案是肯定的,但这毕竟是一个漫长的过程,存在诸多变数。于
经院哲学最著名的代表人物是意大利神学家(),著有《神学大全》。
CIRCUMVENTION:
最新回复
(
0
)