首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮,背景色变为红色;再单击,背景色变为绿色;再单击,背景色变为蓝色;再单击背景色变为红色……如此循环。单击“结束”按钮,程序运行结束。请填空。 Private Sub cmdCha
在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮,背景色变为红色;再单击,背景色变为绿色;再单击,背景色变为蓝色;再单击背景色变为红色……如此循环。单击“结束”按钮,程序运行结束。请填空。 Private Sub cmdCha
admin
2009-01-15
78
问题
在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮,背景色变为红色;再单击,背景色变为绿色;再单击,背景色变为蓝色;再单击背景色变为红色……如此循环。单击“结束”按钮,程序运行结束。请填空。
Private Sub cmdChange_Click()
If Mark=0 Then
【 】
Mark=1
ElseIf【 】Then
Forml.BackColor=vbGreen
Mark=2
ElseIf Mark=2 Then
Form1.BackColor;vbBlue
【 】
End If
End Sub
Private Sub cmdExit_Click()
End
End Sub
选项
答案
Form1.BackColor = vbRed , Mark=1 , Mark=0
解析
首先过程中定义了一个模块级整型变量Mark,每次都保留上次运行后的值。由程序可以看出:本题约定Mark等于0表示背景色为红色;Mark等于1表示背景色为绿色;Mark等于2表示背景色为蓝色,每次单击运行后要将Mark变为下次运行时的值,以便符合题目要求。所以【 】应为Form1.BackColor= vbRed,【 】为Mark=1;当背景色变为蓝色后再单击背景色要变为红色,所以应将Mark变为0,所以【 】为Mark=0。注意:多分支控制语句。
转载请注明原文地址:https://kaotiyun.com/show/tp2p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
关于多线程,下列哪个说法不正确?
下列关于Java语言的数据类型和表达式的说法不正确的是
一个JavaApplication运行后,在系统中是作为一个()。
树是结点的集合,它的根结点数目是
设x,y均为已定义的类名,下列声明对象x1的语句中正确的是()。
为了向一个Applet传递参数,可以在HTML文件的APPLET标志中使用PAPAM选项。在Applet程序中获取参数时,应使用的方法是
Java设计有______功能,这不仅防止了内存地址计算出错的问题,也省去了编程时对内存进行分配的烦恼。
软件生命周期包括8个阶段。为了使各时期的任务更明确,又可分为3个时期:软件定义期、软件开发期、软件维护期。编码和测试属于【】期。
在一个长度为n的线性表中插入一个元素,最坏情况下需要移动的数据元素数目为()。
按运算符操作数的数目划分,运算符?:的类型是
随机试题
图1-9所示电路中,已知RB=300kΩ,RC=3kΩ,RL=3kΩ,β=50,VCC=12V。估算放大器的静态工作点;
甲公司业务经理乙长期在丙餐厅签单招待客户,餐费由公司按月结清。后乙因故辞职,当月月底餐厅前去结账时,甲公司认为,乙当月的几次用餐都是其辞职后招待私人朋友的,因而拒付乙所签单的餐费。下列选项正确的是()
中水平消毒能杀灭
我国将货币供应量划分M0,M1,M2,M3,其中M2包括外币存款和()。
孙某与甲公司签订了为期3年的劳动合同,月工资1200元(当地最低月工资标准为800元)。期满终止合同时,甲公司未向孙某提出以不低于原工资标准续订劳动合同意向,甲公司应向孙某支付的经济补偿金额为()元。
2016年上半年,我国服务业增加值184290亿元,同比增长7.5%,占GDP匕重54.1%,比第二产业高出14.7个百分点,比上年同期提高1.8个百分点。服务业对国民经济增长的贡献率为59.7%,比第二产业高出22.3个百分点。2016年上半年,服务
WhowasthefirsttofindthegoldinCalifornia?
A、 B、 C、 B
Aristotle,theGreekphilosopher,summedupthefourbriefqualitiesofmoneysome2000yearsago.Itmustbelastingandeasy
Becausesomeresourcesmustbeallocatedatthenationallevel,wehavecreatedpolicieswhichreflecttheaggregatedattributes
最新回复
(
0
)