2. 计算机
  3. 窗体上有三个水平滚动条，名称分别为HSRed、HSGreen和HSBlue，取值范围均是0～255，代表颜色的三种基色。改变滚动框的位置，可以改变三种基色的值，从而改变窗体的背景色，如下图所示。 [*130] 程序代码如下： Dim color(3)As

窗体上有三个水平滚动条，名称分别为HSRed、HSGreen和HSBlue，取值范围均是0～255，代表颜色的三种基色。改变滚动框的位置，可以改变三种基色的值，从而改变窗体的背景色，如下图所示。 [*130] 程序代码如下： Dim color(3)As

admin2015-08-28  47
问题 窗体上有三个水平滚动条，名称分别为HSRed、HSGreen和HSBlue，取值范围均是0～255，代表颜色的三种基色。改变滚动框的位置，可以改变三种基色的值，从而改变窗体的背景色，如下图所示。
[*130]
程序代码如下：
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、ABCDEF
B、abcdef
C、defdef
D、defabc
答案C
解析 程序中过程Fun的Do循环的功能是从参数字符串中依次取出后半部分的字符组成一个字符串，然后这个字符串再重复一次由函数返回。函数Len用于返回字符串的长度，过程中字符串的长度做为Do循环的结束条件。Mid是字符串中部截取函数，用来从指定位置开始截取指定个数的字符。过程中使用Mid(xStr， i＋1， 1)，通过循环依次取出字符串后半部分的字符。函数返回的字符串经Lcase函数转换为小写然后显示在文本框中。程序中做为Fun过程参数的字符串为"ABCDEF"，经处理返回并转为小写后为"defdef"。
转载请注明原文地址:https://www.kaotiyun.com/show/EzLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)