首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮,背景色变为红色;再单击,背景色变为绿色;再单击,背景色变为蓝色;再单击背景色变为红色……如此循环。单击“结束”按钮,程序运行结束。请填空。 Private Sub cmdCha
在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮,背景色变为红色;再单击,背景色变为绿色;再单击,背景色变为蓝色;再单击背景色变为红色……如此循环。单击“结束”按钮,程序运行结束。请填空。 Private Sub cmdCha
admin
2009-01-15
60
问题
在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮,背景色变为红色;再单击,背景色变为绿色;再单击,背景色变为蓝色;再单击背景色变为红色……如此循环。单击“结束”按钮,程序运行结束。请填空。
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全国计算机二级
相关试题推荐
结构化程序设计主要强调的是
在AWT包中,创建一个具有10行,45列的多行文本区域对象ta的语句为【】。
下列哪个语句是声明一个含有10个String对象的数组?
一些重要的程序语言(如C语言和Pascal语言)允许过程的递归调用。而实现递归调用中的存储分配通常用
在数据管理技术发展过程中,文件系统与数据库系统的主要区别是数据库系统具有
在软件工程中,白箱测试法可用于测试程序的内部结构。此方法将程序看做是
下列基本命令中,属于类文件分解器命令的是
设一棵二叉树中有3个叶子结点,有8个度为l的结点,则该二叉树中总的结点数为【】。
设树T的度为4,其中度为1,2,3,4的结点个数分别为4,2,1,1。则T中的叶子结点数为
随机试题
大会召开前,中组部要求,在党代表选举工作中,要进一步扩大党内民主,充分走群众路线。"要进一步扩大党内民主"是因为()。①民主集中制是党的根本组织原则和领导制度②国家机构要坚持对人民负责的原则③我国的人民民主专政是新型民主和新
不属于裂纹舌临床意义的是
根据药典规定,以下是片剂质量要求的是()。
已知某材料供应价格为50000元,运杂费5000元,采购保管费率1.5%,运输损耗率2%,则该材料的单价为()万元。
甲公司向乙公司某大股东发行普通股300万股(每股面值1元,公允价值4元),同时承担该股东对第三方的债务300万元(未来现金流量的现值),以换取该股东拥有的30%乙公司股权。增发股票过程中甲公司以银行存款向证券承销机构支付佣金及手续费共计6万元。取得投资时,
根据下列资料,回答下列问题。2015年我国非智能手机比上年增长:
若数据段偏移地址0010H处定义变量VAR DW1,$+2,5,则偏移地址0012H字单元的数据是( )。
Theboardofdirectorshavealreadydiscussedthesubject_____inthepreviousmeetingsandtheywillhandleitinallitsaspect
ThewildlifebiologisttoldmyfathertheSandhillCranes______throughWarnerwererareandvanishingcreature.
TheChinesefairystoryFlyingtotheMoonnowturnstobetrue,withChina【C1】______thecountry’ssecondunmannedlunarprobe,
最新回复
(
0
)