首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBhe,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。 程序代码如下: Dim color(3)As Intege
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBhe,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。 程序代码如下: Dim color(3)As Intege
admin
2018-12-20
37
问题
窗体上有三个水平滚动条,名称分别为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全国计算机二级
相关试题推荐
设x为一整型变量,且情况语句的开始为:SelectCasex,则不符合语法规则的Case子句是( )。
下列选项中不属于结构化程序设计原则的是( )。
在数据管理技术发展的三个阶段中,数据共享最好的是( )。
在窗体上画1个命令按钮和1个文本框,其名称分别为Command1和Text1,再编写如下程序:DimssAsStringPrivateSubText1_KeyPress(KeyAsciiAsInteger) IfChr(KeyAsc
能够将组合框Combo1中最后一个数据项删除的语句为( )。
数据字典(DD)所定义的对象都包含于
下面描述中不属于数据库系统特点的是
在关系模型中,每一个二维表称为一个()。
假定有如下的程序段:DimintVarAsIntegerintvar=TruePrintintVar则输出结果是
随机试题
广告推广
A.131IB.127IC.125ID.124IE.123I在放射免疫分析中,用于标记抗原的核素是
张某与李某共有一台机器,各占50%份额。双方共同将机器转卖获得10万元,约定张某和李某分别享有6万元和4万元。同时约定该10万元暂存李某账户,由其在3个月后返还给张某6万元。后该账户全部款项均被李某债权人王某申请法院查封并执行,致李某不能按期返还张某款项。
【2017年】某企业销售原材料取得收入40000元,该材料成本为30000元,出租设备取得租金收入2000元(不含增值税),计提该设备折旧1200元。不考虑其他因素,上述业务导致当期营业利润增加()元。
房地产业属于第()产业。
A、 B、 C、 D、 C样式的叠加。第一个图和第二个图叠加之后得到第三个图。答案选C。
声音的高低由()决定。
设f(x)在[a,b]上可导,且f’+(a)>0,f’-(b)>0,f(a)≥f(b),求证:f’(x)在(a,b)至少有两个零点.
[*]
Mostofusgothroughlifeadding______toknowledge,polishingaconcepthereorthere,doinganexperiment,contributingafew
最新回复
(
0
)