首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Textl的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timerl的事件过程如下: Private Sub Timerl Tliner() Static flag As
窗体上有1个名称为Textl的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timerl的事件过程如下: Private Sub Timerl Tliner() Static flag As
admin
2013-04-11
26
问题
窗体上有1个名称为Textl的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timerl的事件过程如下:
Private Sub Timerl Tliner()
Static flag As Integer
Ifflag=0 Then flag=1
flag=-flag
Ifflag=1 Then
Textl.ForeColor=&HFF& &HFF&为红色
Else
Textl.ForeColor=&HC000& &HC000&为绿色
End If
End Sub
以下叙述中正确的是
选项
A、每次执行此事件过程时,flag的初始值均为0
B、flag的值只可能取0或l
C、程序执行后,文本框中的文字每5秒改变一次颜色
D、程序有逻辑错误,Else分支总也不能被执行
答案
C
解析
flag变量为静态变量;第一次执行Timerl_Timer事件过程,flag=-1,文本框为绿色;第二次执行Timerl—Timer事件过程,flag=1。文本框为红色;第三次执行Timerl_Jimer事件过程,flag=-1,文本框为绿色;依次类推,每执行一次,文本框的颜色变换一次,时间间隔为5秒,所以正确答案为C)。
转载请注明原文地址:https://kaotiyun.com/show/UoQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
Sub过程与Function过程最根本的区别是
在窗体上利用菜单编辑器设计一个主菜单项“菜单控制”(Name属性值为mnuMenu),然后为其设计一个子菜单项“增加菜单”(Name属性值为mnuAdD)另外设置一个标题为空的菜单项(控件数组),其Name属性值为mnuDyn,Index值为0,Visi
函数Str$(256.36)的值是【】。
用下面的语句所定义的数组的元素个数是:______。Dimarr(3To5,-2to2)
在窗体上画—个命令按钮,其名称为Command1,然后编写如下程序:FunctionM(xAsInteger,yAsInteger)M=IIf(x>y,x,y)EndFunctionPrivateSub
数据库管理系统常见的数据模型有层次模型、网状模型和【】三种。
以下程序的功能是:将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(i)到A(10)依次赋给B(1,1)到B(1,10),把A(11)到A(20)依次赋给B(2,1)到B(2,10),……,把A(91)到A(100)依次赋给B
在考生文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sit5.frm。窗体中已经给出了所有控件(框架中的3个单选按钮构成了一个控件数组),如图3—1所示,请编写适当的事件过程。程序运行后,如果选中某个单选按钮,然后单击“计算”命令按钮,则计算出数
下列说法中,不属于数据模型所描述的内容的是______。
下列不属于软件工程3个要素的是()。
随机试题
A、分泌性腹泻B、渗出性腹泻C、吸收不良性腹泻D、动力性腹泻E、渗透性腹泻;下述疾病分别属于何种腹泻?促胃液素瘤
男性,30岁,腹部刀伤2小时。剖腹探查发现肝部分破裂,胃、肠破裂,横结肠破裂,膀胱破裂,首先应行
首先应做的检查( )。应严密观察,以防出现( )。
A.去甲肾上腺素B.间羟胺C.肾上腺素D.麻黄碱E.多巴胺可用于上消化道出血的是
既能攻下冷积,又能祛痰利咽治喉痹的药物是
【2014年】企业内部银行是一种经营部分银行业务的非银行金融机构。需要经过中国人民银行审核批准才能设立。()
在“商品—货币—商品”的流通过程中,“商品—货币”阶段的变化“是商品的惊险的跳跃”。这个跳跃如果不成功,摔坏的不是商品,而是商品所有者。这说明()。
下列Cisco路由器进入vty配置模式后的命令提示符,正确的是()。
当电源关闭后,下列关于存储器的说法中,正确的是()。
Inhis______tofurtherhisknowledgeoftheuniverse,manhasnowbeguntoexplorespace.
最新回复
(
0
)