VB-Homepage Tipp 098

Interessante Möglichkeit für die Visible Eigenschaft von Formen

Das man Formen ausblenden und einblenden kann ist weder neu noch hier einen Tipp wert. Über Form1.Hide (ausblenden) und Form1.Show (einblenden) kann man so zum Beispiel über verschiedene Formen im Wechsel anzeigen. Nun wäre es ja auch denkbar, eine Form im Wechsel aus und einzublenden, so als Warnmeldung (Es werden gleich alle Datensätze gelöscht:-) Am einfachsten wäre es sicher, den Zustand der Form zu ermitteln und dann den anderen Zustand herzustellen. Etwa so... If Form1.Show then    Form1.hide Else    Form1.show End If Testen Sie es und Sie werden sehen, es geht so nicht. Bisher hätte ich mir damit geholfen, indem ich in einer Variable dem jeweiligen Zustand einen Wert zuordnet und dann diesen Wert auswerte. Etwa so ... If Label1.Caption = "1" Then    Form1.Show    Label1.Caption = "0"    Exit Sub Else    Form1.Hide    Label1.Caption = "1"    Exit Sub End If Label1 dient hier also als Ablage für den Wert, der den Zustand der Form definiert. Testen Sie es und Sie werden sehen, es geht so. Nun habe ich aber etwas gefunden, das die selbe Funktionalität beinhaltet, aber wesentlich eleganter ist. Form1.Visible = Not Form1.Visible Mehr ist das nicht und wenn Sie dies in einen Timer packen und den auf 1000 (also 1sek.) stellen, wird Ihre Form im Zeittakt von einer Sekunde ein und ausgeblendet.

Tipp-Download

Quelle : Cobbs / Inside VB