Question

VB中text.index是什么意思？

两个文本框~怎样让文本1的内容变为文本2中选择的内容？

Answer 1

VB中.Index是控件数组的某个控件的编号。当建立了Text控件的控件数组后，就存在.Index这个属性。

Index 属性（控件数组），返回或设置唯一地标识控件数组中一个控件的编号。仅当控件是控件数组的元素时是有效的。

因为控件数组元素共享同一个 Name 属性设置，所以必须在代码中使用Index 属性来指定数组中的一个特定的控件。Index
必须以整数的形式（或一个能计算出一个整数的数字表达式）出现在紧接控件数组之后的圆括号内－例如，MyButtons(3)。

Index 属性示例：

该例子开始时有两个 OptionButton 控件，并在每次单击 CommandButton 控件时在窗体中加入一个新的
OptionButton。当单击一个 OptionButton 时，FillStyle
属性被设置并且画一个新的圆。要试用此例，将下面的代码粘贴到具有两个 OptionButton 控件、一个 CommandButton、以及一个大的 PictureBox
控件的窗体的声明部分之中。将两个 OptionButton 控件的 Name 属性都设置为 optButton
以创建一个控件数组。

Private Sub OptButton_Click(Index As Integer)
    Dim H, W   '声明变量。
    Picture1.Cls   '清除图片。
    Picture1.FillStyle = Index   '设置 FillStyle。
    W = Picture1.ScaleWidth / 2   '获取圆的大小。
    H = Picture1.ScaleHeight / 2
    Picture1.Circle (W, H), W / 2   '画圆。
End Sub

Private Sub Command1_Click()
    Static MaxIdx   '数组中的最大索引值。
    If MaxIdx = 0 Then MaxIdx = 1   '预置 MaxIdx。
    MaxIdx = MaxIdx + 1   '索引值增加 1 。
    If MaxIdx > 7 Then Exit Sub   '在窗体中放置八个按钮。
    Load OptButton(MaxIdx)   '在数组中创建新的项。
    '在前一个按钮下面设置新选项按钮的位置。
    OptButton(MaxIdx).Top = OptButton(MaxIdx - 1).Top + 360
    OptButton(MaxIdx).Visible = True   '使新的按钮可见。
End Sub

下图是运行效果：从两个OptionButton 控件组成的控件数组增加OptionButton 控件的数组成员。

Answer 2

index索引，只有用到了控件数组才需要
Text1.text = Text2.SelText

Answer 3

text.index－－Tab顺序

Private Sub Text2_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Text1 = Text2.SelText
End Sub