首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。 程序代码如下: Dim color(3)As Intege
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。 程序代码如下: Dim color(3)As Intege
admin
2015-08-28
47
问题
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。
程序代码如下:
Dim color(3)As Integer
Private Sub Form_Load()
Call fill(color())
End Sub
Private Sub fill(c() As Integer)
Form1.BackColor=RGB(c(1),c(2),c(3))
End Sub
Private Sub HSRed_Change()
color(1)=HSRed.Value
Call fill(color())
End Sub
Private Sub HSGreen_Change()
color(2)=HSGreen.Value
Call fill(color())
End Sub
Private Sub HSBlue_Change()
color(3)=HSBlue.Value
Call fill(color())
End Sub
关于以上程序,如下叙述中错误的是( )。
选项
A、color是窗体级整型数组
B、改变任何一个滚动条滚动框的位置,窗体的背景色将立刻随之改变
C、3个滚动条Change事件过程中只设置了一个color数组元素的值,调用fill过程失败
D、fill 函数定义中的形式参数是数组型参数
答案
C
解析
当用Dim语句定义数组时,该语句把数值数组中的全部元素都初始化为0,而把字符串数组中的全部元素都初始化为空串。因此color数组中的元素初始值都为0,没有空值,过程调用不会失败。C选项叙述错。
转载请注明原文地址:https://kaotiyun.com/show/TsLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的输出结果为______SubPrin()DimBAsStringA=1B=A&Space(4)&APrintAPrintTrim(B)EndSub
编写一个程序把一维数组的各元素反序存放。在主过程中调用subl过程把从键盘上输入的10个元素反序存放后再输出。根据题意,请完善下列程序。PrivateSubsubl(b()AsInteger,ByValnAsInteger)DimiA
在计算机中,算法是指______。
首先执行循环体,然后再进行条件判断,决定是否结束循环的循环语句是______。
下列程序段错误的是()。
程序设计方法包括______和面向对象的程序设计。
下列关于MDI子窗体在运行时特性的叙述错误的是()。
软件中子类部件对父类部件属性的延续性指软件的______。
下列叙述中正确的是______。
符号%是声明______类型变量的类型定义符。
随机试题
兴奋性突触后电位的产生,是由于突触后膜提高了何种离子的通透性()
预防校正弱视最主要的措施是()
使全部实验动物死亡的最低剂量使个别实验动物死亡的剂量
张风因产品质量问题,向法院起诉博瑞食品公司。张风为了赢得诉讼,决定委托诉讼代理人,其间遇到以下问题:下列哪些人员可以作为张风的诉讼代理人?()
下列各项中,属于成本计算方法的有()。
关于宗教和语言,下列说法正确的是()。
公务员法明确规定。公务员要遵守纪律,-恪守职业道德,模范遵守社会公德。请结合报考岗位谈谈你的理解。
已知总体分布为正态,方差未知。从这个总体中随机抽取样本容量为65的样本,样本平均数为60,样本方差为100,那么总体均值μ的99%的置信区间为
EvidencesofHumanHistoryInthestudyofhumanhistory,therearemanypointsthatrequirestudyandresearch;thereison
Whenwethinkofentrepreneurs,mostofusimagine【C1】______,successful,over-achieverslikeBillGatesofMicrosoft,RichardB
最新回复
(
0
)