Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Verstehe ich einfach nicht
Autor: Jan
Datum: 23.07.01 10:51
Ich habe ein kleines Programm geschrieben. Ich finde den fehler nicht. Steuerelemente: Commandbutton1, Commandbutten2, Textbox In die Textbox soll eine Zahl eingegeben werden. Diese Zahl soll dann die Variable "Darf" sein, nachdem man auf Command2 geklickt hat. Mit Command1 kann man die Variable "a" um eins erhöhen. Wenn "a" größer ist als "Darf" soll sich das Programm beenden. Dim a Dim Darf ------------------------------------------------------- Private Sub Command1_Click() a = a + 1 Label1 = a If a > Darf Then End End Sub -------------------------------------------------------- Private Sub Command2_Click() Darf = Text1 End Sub Danke an alle die mir bei diesem dringenden Problem helfen. MFG Jan

Verstehe ich einfach nicht	77	Jan	23.07.01 10:51
Re: Verstehe ich einfach nicht	330	Dieter	23.07.01 11:02
Re: Danke Vielmals	52	Jan	23.07.01 13:14

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen