This is how I did:
First I created a common TextChanged event for all the textboxes.
Private Sub TextChanged(sender As Object, e As EventArgs)
Dim txtEdit As TextBox = DirectCast(sender, TextBox)
For Each cntrl As Control In Me.Controls
If TypeOf cntrl Is TextBox AndAlso cntrl.Name <> txtEdit.Name Then
cntrl.Enabled = False
End If
Next
End Sub
}
And then register it :
Public Sub New()
InitializeComponent();
AddHandler(textBox1.TextChanged, AddressOf(TextChanged))
AddHandler(textBox2.TextChanged, AddressOf(TextChanged))
AddHandler(textBox3.TextChanged, AddressOf(TextChanged))
End Sub
Hope it helped.