如何在标签上选择文本框单击

粗糙

在Microsoft Access中，当您单击标签时，与该标签关联的文本框将获得焦点。据我所知，VB.NET没有此功能。我知道我总是可以在标签的click事件中添加一些内容，就像这样...

TextBox1.Focus()

但是我在表单上有数十个字段，如果不需要将其添加到每个标签的click事件中，它将使其变得非常容易。

我猜可能会为所有标签强制一个选项卡进入下一个控件创建一个事件，并假设我正确设置了Tab索引，那么这将起作用。向表单添加新字段时会出现问题，在这种情况下，所有选项卡索引都需要重新验证。

Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click, Label2.Click
    'code to tab to next field...
End Sub

有没有更简单的方法？

艾莉·艾哈达德（Aly Elhaddad）

首先，在表单上设置控件的TabIndex顺序，然后使用以下代码：

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        For Each c As Control In Me.Controls
            If TypeOf c Is Label Then AddHandler c.Click, AddressOf Label_Click
        Next
    End Sub

    Private Sub Label_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        Me.SelectNextControl(sender, True, True, True, True)
    End Sub
End Class

现在，无论何时单击标签，都将重点关注该顺序中的以下控件。

本文收集自互联网，转载请注明来源。

如有侵权，请联系 [email protected] 删除。