Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Laufzeitfehler
Autor: Stift
Datum: 19.12.01 01:43
Hi Tux Setze im Eigenschaftsfenster vom Command1 die Eigenschaft "Default" auf "True", und beim Drücken der Eingabetaste wird das Click Ereigniss ausgelöst. SetFocus, setzt eben den Eingabefokus auf die TextBox. SendKeys "{Home}+{End} makiert den ganzen inhalt der TextBox, sodas du sie nicht erst (zB. mit Backspace) löschen mußt. Frag mich nur für was du eine ListBox als ausgabe benützt wenn der "alte" inhalt sowieso sofort wieder gelöscht wird. Könntest ja auch ein Label oder eine TextBox verwenden!?? Private Sub betrag_Change() If IsNumeric(betrag.Text) = True then b = betrag.Text Else: b=0 End if End Sub Private Sub Command1_Click() ausg.Clear Y = b * u ausg.AddItem Y betrag.SetFocus SendKeys "{Home}+{End} End Sub Private Sub Option1_Click() u = 2 End Sub Private Sub Option2_Click() u = 0.5 End Sub Da es bei dir ja an elementarem Grundwissen scheitert, würde ich dir ein Buch empfehlen. Es muß ja kein Schmöker sein, soll dir halt mal die wichtigsten Sachen zeigen. Der Rest kommt dann schon von allein (oder von vb@rchiv lg stift

Laufzeitfehler "13" !!!!!	58	Tux_007	17.12.01 16:09
Re: Laufzeitfehler "13" !!!!!	263	Dieter	17.12.01 16:46
Re: Laufzeitfehler	47	Stift	17.12.01 17:14
Re: Laufzeitfehler	36	Tux_007	17.12.01 18:26
Re: Laufzeitfehler	42	Stift	19.12.01 01:43

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