18 lines
463 B
VB.net
18 lines
463 B
VB.net
Public Class InputExpanderV
|
|
|
|
Sub New()
|
|
|
|
' La chiamata è richiesta dalla finestra di progettazione.
|
|
InitializeComponent()
|
|
|
|
' Aggiungere le eventuali istruzioni di inizializzazione dopo la chiamata a InitializeComponent().
|
|
'TextBoxFocus.Focus()
|
|
AddHandler Map.refInputExpanderVM.m_FocusOnTextBox, AddressOf FocusOnText
|
|
End Sub
|
|
|
|
Friend Sub FocusOnText()
|
|
Me.TextBoxFocus.Focus()
|
|
End Sub
|
|
|
|
End Class
|