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

admin2019-04-29  31

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

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

答案D

解析 控件数组是一组具有共同名称和类型的控件,它们拥有共同的事件,数组中的每个控件都有唯一的索引号(Index),即下标,默认索引号从0开始。本题中的两个文本框的Index值分别为0和1,所以Case Else分支的语句永远不会被执行;根据程序向任何一个文本框输入字符,都会在另一个文本框中显示该字符;在0号文本框中输入时1号文本框的字号是0号文本框字号的2倍,在1号文本框中输入时0号文本框的字号是1号文本框字号的一半,相当于没有变化,不会越来越小。
转载请注明原文地址:https://jikaoti.com/ti/M8N0FFFM
0

最新回复(0)