首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Textl的文本框;一个名称为Timerl的计时器控件,其Interval属性值为5000,Ena-bled属性值是True。Timerl的事件过程如下: Private Sub Timerl_Timer() Static
窗体上有一个名称为Textl的文本框;一个名称为Timerl的计时器控件,其Interval属性值为5000,Ena-bled属性值是True。Timerl的事件过程如下: Private Sub Timerl_Timer() Static
admin
2020-07-22
50
问题
窗体上有一个名称为Textl的文本框;一个名称为Timerl的计时器控件,其Interval属性值为5000,Ena-bled属性值是True。Timerl的事件过程如下:
Private Sub Timerl_Timer()
Static flag As Integer
If flag=0 Then flag=l
flag=-tlag
If flag=I Then
Textl.ForeColor=&HFF& ’&HFF&为红色
Else
Textl.ForeColor 22&HCOOO& ’&HCOOO&为绿色
End If
End Sub
以下叙述中正确的是( )。
选项
A、每次执行此事件过程时,flag的初始值均为0
B、flag的值只可能取0或l
C、程序执行后,义本框中的文字每5秒改变一次颜色
D、程序有逻辑错误,Else分支总也不能被执行
答案
C
解析
程序中flag被定义为Static变量,它的值只在第一次执行事件过程时为0,以后每次执行计时器事件过程它的位都会保留上次过程中运算后的值,之后它的值是1或-l。文本框控件的ForeColor属性表示文本框中文字的颜色,计时器控件的Interval属性为5000,即计时器间隔为5秒钟一次,每次调用就会交替改变文本框中文字的颜色。因此C选项正确。
转载请注明原文地址:https://kaotiyun.com/show/0XHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果在框架中画了2个复选框,且框架的Enabled属性被设置为False,2个复选框的Enabled属性被设置为True,则下面叙述中正确的是
为了使丈本框显示滚动条,除要设置ScrollBars外,还必须设置的属性是
能够存放组合框的所有项目内容的属性是
设有以下过程:PrivateSubproc(xAsInteger,OptionalyAsInteger)Printx,yEndSub针对此过程,下面正确的过程调用语句是
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr="":strL=Len(xStr)
窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程:PrivateSubText1.KeyUp(KeyCodeAsInteger,ShiftAsInteger)PrintTextl.Text;EndSub运行程序,并
以下不能输出“Program”的语句是
在关系数据库设计中,关系模式是用来记录用户数据的()。
以下自定义数据类型的语句中,正确的是
随机试题
使用标准磨口仪器时错误的做法是()。
女性,33岁,低热、干咳、胸闷2个月,体检发现纵隔及双肺门淋巴结肿大,OT试验阴性,血清血管紧张素转化酶偏高男性,19岁,闻刺激性气味干咳6周,伴胸闷,夜间有喘息,偶自闻呼气时"喘鸣音",查体双肺呼吸音正常(白天),胸片未见明显异常。追问病史近2个月居
患者反复呕吐隔餐食物。查体:消瘦,上腹部膨胀,并见胃型。应首先考虑的是
疳证的好发年龄是
按照《处方药与非处方药分类管理办法(试行)》,非处方药分甲、乙两类,是根据药品的
中央银行一般使用的货币政策工具包括传统的存款准备金率、再贴现率和( )等。
国际货币体系的核心机构是()。
在智能化无人超市,客人从进门到出门,一举一动都会被数字化,并且被捕捉记录。这些信息回流到云端后,通过算法模型,可以得到许多非常有价值的信息:比如男性顾客和女性顾客各自进店最集中的时间段是什么,哪些商品被拿起又放回去的频次最高等。甚至还能做出预测,比如,传感
如果一个教师可以讲授多门课程,一门课程可以由多个教师来讲授,则教师与课程存在的联系是()。
A、Theycanprovidemorenutrients.B、Theylookexactlylikerealplants.C、Theydonottastegoodenough.D、Theylackimportant
最新回复
(
0
)