程序代码如下: Dim color(3) As Integer Private Sub Form_Load() Call fill( color() ) End Sub Private Sub fill(c() As Integer) Form1. BackCotor = 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函数定义中的形式参数是数组型参数