首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。 程序代码如下: Dim color(3)As Intege
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。 程序代码如下: Dim color(3)As Intege
admin
2020-07-22
57
问题
窗体上有三个水平滚动条,名称分别为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)
Forml.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/YgHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下通用过程:PublicFunctionf(xAsInteger) DimyAsInteger x=20 y=2 f=x*yEndFunction在窗体上画一个命令按钮,其名称为Command1,然后编写如下
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有一个文本框数组,名称为Text1,下标从0开始。程序运行后,单击“产生随机数”按钮,就会随机产生10个3位数,并放人Text1数组中(如图1所示);单击“重排数据”按钮,则把Text1中的奇数移到前面
负责数据库中查询操作的数据库语言是( )。
双精度浮点数的类型说明符为
假设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是()。
下列叙述中正确的是
在表达式2+3*4^5-Sin(x+1)/2中,首先进行的运算是()o
以下不合法的VisualBasic变量名是
下列描述中,不符合良好程序设计风格要求的是
数据库技术的根本目标是要解决数据的
随机试题
临时接地线由()组成。
左心力衰竭最有诊断意义的体征是下列哪一项
骨髓象检查无粒/红比例减低的疾病是
内陷阴伤胃败用何方内陷邪盛热极用何方
李红今年从西安某大学的人力资源管理专业毕业,进入了东莞市的一家研究生产食品添加剂的公司工作。该公司是一个典型的小型家族企业,企业中的关键职位基本上都由老板的亲属担任。李红的上级是老板的大儿子王经理,他主要负责公司研发工作,根本没有管理理念,在他的眼里,只有
有一条河流从遥远的高山上流下来,经过了千山万水。当它要越过沙漠的时候,它发现它的河水渐渐消失在沙里。“也许这就是我的命运,我永远也到不了传说中浩瀚的大海。”它颓丧地自言自语。这时候响起了一阵低沉的声音:“如果微风可以跨越沙漠,那么河流也可以。”这是沙漠发出
阅读下列材料,回答问题。××省政府办公厅关于________的意见×政办发[2015]50号各市、县(市、区)人民政府,省各委办厅局,省各直属单位:
=_________.
Whydon’tyoucomeandplaytenniswithusthisafternoon?
Readthetextbelowaboutafter-saleservice.Inmostofthelines41—52thereisoneextraword.Itiseithergrammaticallyinc
最新回复
(
0
)