首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBhe,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。 程序代码如下: Dim color(3)As Intege
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBhe,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。 程序代码如下: Dim color(3)As Intege
admin
2018-12-20
31
问题
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBhe,取值范围均是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 fiH(color())
End Sub
Private Sub HSGreen_Change()
color(2)=HSGreen.Value
Call fin(color())
End Sub
Private Sub HSBlue_Change()
color(3)=HSBlue.Value
Call fin(color())
End Sub
关于以上程序,如下叙述中错误的是( )。
选项
A、color是窗体级整型数组
B、改变任何一个滚动条滚动框的位置,窗体的背景色将立刻随之改变
C、3个滚动条Change事件过程中只设置了一个color数组元素的值,调用fill过程失败
D、fill函数定义中的形式参数是数组型参数
答案
C
解析
当用Dim语句定义数组时,该语句把数值数组中的全部元素都初始化为0,而把字符串数组中的全部元素都初始化为空串。因此color数组中的元素初始值都为0,没有空值,过程调用不会失败。C选项叙述错。
转载请注明原文地址:https://kaotiyun.com/show/nyFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库设计过程不包括
数据库系统的三级模式不包括( )。
下列叙述中正确的是( )。
编写如下程序:PrivateSubCommand1_Click() Dima(3,3)AsInteger DimsAsInteger Fori=1To3 Forj=1To3 a(i,j)=i
数据字典(DD)所定义的对象都包含于
设有如下程序:OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommand1_Click() ’循环1 Fori=1To3 Forj=1To4
有如下过程代码:Subvar_dim() StaticnumaAsInteger DimnumbAsInteger numa=numa+2 numb=numb+1 printnuma;numbEndSub连续3次
为了使每秒钟发生一次计时器事件,可以将其Interval属性设置为( )。
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
在关系数据库中,用来表示实体间联系的是
随机试题
论述人生的社会价值和自我价值的关系。
脑转移瘤多来源于
有慢性失血性贫血的患者,失血至少达到多少可有贫血表现
下列选项中,不属于材料费的是()。
下列属于墨家主张的是()
人民法院可以判决变更的情形是:
3/2,5/7,12/19,31/50,()
设函数z=z(χ,y)由方程χ=f(y+z,y+χ)所确定,其中f(χ,y)具有二阶连续偏导数,求dz.
某大型项目进行到两年时,使用挣值法所需要的三个中间变量的数值分别是:计划值PV为400万元,实际成本AC为200万元,挣值EV为100万元。基于该项目的成本偏差,下列描述正确的是(1),基于该项目的成本绩效指数,下列描述中正确的是(2)。(1)
Apunctualpersonisinthehabitofdoingathingatthe【11】timeandisneverlateinkeepinganappointment.Heknowsthathe
最新回复
(
0
)