窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程: Private Sub Text1_Change(Index As Integer) Select Case Index Case 0

admin2015-08-13  28

问题 窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程:
    Private Sub Text1_Change(Index As Integer)
        Select Case Index
          Case 0
            Text1(1).FontSize=Text1(0).FontSize*2
            Text1(1).Text=Text1(0).Text
          Case 1
            Text1(0).FontSize=Text1(1).FontSize/2
            Text1(0).Text=Text1(1).Text
          Case Else
            MssBox"执行Else分支"
       End Select
    End Sub
关于上述程序,以下叙述中错误的是(    )。

选项 A、Index用于标识数组元素
B、本程序中Case Else分支的语句永远不会被执行
C、向任何一个文本框输入字符,都会在另一个文本框中显示该字符
D、下标为0的文本框中显示的字符尺寸将越来越小

答案D

解析 控件数组的Index属性作为控件数组的下标,用于标识数组元素。题目中程序功能是当任意一个文本框内容改变时,设置第2个文本框的字号是第1个文本框字号的2倍,同时两个文本框显示相同文字。假如用户没有使用控件数组的Index属性的默认值,程序将执行Else分支。
转载请注明原文地址:https://kaotiyun.com/show/OSQp777K
0

最新回复(0)