0

フォームには100個のテキストボックスがあります。これらはすべてTabIndexによって0から99の順に並べられているため、すべてを表にまとめることができます。

偶数のTabIndexの値を変更すると、次のTabIndexのセルボックスが同じ値を取得するように設定する必要があります。
したがって、たとえば、の値を変更するtextbox6とtextbox7、同じ値が得られます。

このコードは、テキストボックスに対してのみそれを行います。

Private Sub Value_Changed(.....) Handles textbox0.TextChanged, textbox2.TextChanged etc...
....
End Sub

私の問題は、tabindex = tabindex+1を使用してテキストボックスの値を設定する方法がわからないことです。

任意のヒント？

4

1 に答える 1

2

「getnextcontrol」関数で解決しました！

        Dim txt As TextBox = DirectCast(sender, TextBox)
        Dim txt2 As TextBox
        txt2 = GetNextControl(sender, True)
        txt2.Text = txt.text
于 2013-01-28T08:57:37.373 に答える