[Visual Basic] Private Sub cboxNurAktive_CheckedChanged( _
ByVal sender As Object, _
ByVal e As EventArgs _
) Handles _
cboxNurAktive.CheckedChanged
[Visual Basic] Private Sub cboxNurAktive_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cboxNurAktive.CheckedChanged
If Me.Check_Changes Then
If Me.tstxtSuche.Text <> "" Then
Treeviewdata.Load_Tree(Me.TreeApplikationen, False, Me.tstxtSuche.Text, Me.cboxNurAktive.Checked)
Me.TreeApplikationen.SelectedNode = Me.TreeApplikationen.Nodes(0)
Me.FormDataChanged = False
Else
Treeviewdata.Load_Tree(Me.TreeApplikationen, False, "", Me.cboxNurAktive.Checked)
Me.TreeApplikationen.SelectedNode = Me.TreeApplikationen.Nodes(0)
Me.FormDataChanged = False
End If
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