vb.net将文本插入活动文本框

时间:2016-05-04 04:33:26

标签: vb.net

在Windows窗体中,我有一个按钮和两个文本框。当我单击按钮时,我希望将一些文本添加到保持光标的文本框的光标位置。我知道将文本插入光标位置的文本框非常简单。但是有两个文本框,

我考虑使用focus属性来确定当前正在键入的文本框,但是当我单击按钮时,焦点会跳转到按钮...

我的问题,如何知道“最后集中控制”..或者无论如何知道文本框是否正在发短信?

2 个答案:

答案 0 :(得分:0)

您可以使用Flag来检查上一个TextBox焦点: 例如:

Dim iTxt=0
 Private Sub txt1_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles txtFile.MouseClick
iTxt=1
    End Sub
 Private Sub txt2_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles txtFile.MouseClick
iTxt=2
    End Sub

答案 1 :(得分:0)

没有内置... -> current -> temp -> current.getNext() (the original current.getNext()) -> ... 属性。这完全取决于你要记住。

LastFocusedTextBox

您可以在这种情况下使用Private lastFocusedTextBox As TextBox Private Sub TextBoxes_Enter(sender As Object, e As EventArgs) Handles TextBox1.Enter, TextBox2.Enter lastFocusedTextBox = DirectCast(sender, TextBox) End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click If lastFocusedTextBox IsNot Nothing Then lastFocusedTextBox.SelectedText = "Hello World" End If End Sub 事件,但使用Leave表示Enter将在代码中包含正确的值,而lastFocusedTextBox具有焦点太