[Visual Basic] Private Sub TStxtFilter_KeyDown( _
ByVal sender As Object, _
ByVal e As KeyEventArgs _
) Handles _
TStxtFilter.KeyDown
[Visual Basic] Private Sub TStxtFilter_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TStxtFilter.KeyDown
If e.KeyCode = Keys.Enter Then
refresh_vertragspartnerliste()
End If
If Me.TreeVertragspartner.Nodes.Count = 1 Then
Me.TreeVertragspartner.SelectedNode = Me.TreeVertragspartner.Nodes(0)
End If
End Sub
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition