Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: FEHLER ( unverständlich )
Autor: Danzi
Datum: 08.12.03 18:11
Hallo Andy, ich habe Dir schon einmal den Tip gegeben, Zahlen und Text nicht zu verwechseln. Label.Caption liefert einen Text (String) !!! Mit CDbl( ) wandelt man einen String in eine Zahl (Double) um. Dabei darf in dem String außer Ziffern, Komma und Punkt kein anderes Zeichen stehen. Der String darf auch nicht leer sein !!! Es muß nicht heißen: Label1.Caption = Text1.Text * 52.53 & " EUR " sondern: Label1.Caption = Format(CDbl(Text1.Text) * 52.53, "#,##0.00 EUR") Wenn Du dann mit dem Label rechnen willst muß es heißen: Label2.Caption = Format(CDbl(mid$(Label1.Caption,1,Len(Label1.Caption)-4)) * 13, "#,##0.00 EUR") Du siehst, das sieht alles umständlich aus. Deshalb solltest Du dir lieber ein paar Variablen deklarieren, mit denen Du rechnest. Die Labels sollten dann nur als Medium für die formatierte Anzeige dienen. z. B. so: Hinweis: im Textfeld dafür sorgen, daß nur Ziffern und Komma zugelassen sind Private WertLabel1 as Double Private WertLabel2 as Double Private WertText1 as Double Private Sub Text1_LostFocus() If Text1.Text = "" Then Text1.Text = 0 WertText1 = CDbl(Text1.Text) Rechnen End Sub Private Sub Rechnen ( ) WertLabel1 = WertText1 * 52.53 WertLabel2 = WertLabel1 + 123 * WertText1 Label1.Caption = Format(WertLabel1, "#,##0.00 EUR") Label2.Caption = Format(WertLabel2, "#,##0.00 EUR") End Sub Posten = einen Beitrag zum Forum senden

FEHLER ( unverständlich )	547	Andy288bln	08.12.03 15:57
Re: FEHLER ( unverständlich )	343	Dieter	08.12.03 17:35
Re: FEHLER ( unverständlich )	343	Andy288bln	08.12.03 17:44
Re: FEHLER ( unverständlich )	354	Dieter	08.12.03 17:55
Re: FEHLER ( unverständlich )	355	Andy288bln	08.12.03 17:58
Re: FEHLER ( unverständlich )	317	Andy288bln	08.12.03 18:04
Re: FEHLER ( unverständlich )	341	Gigaherz	08.12.03 17:54
Re: FEHLER ( unverständlich )	403	Danzi	08.12.03 18:11
Re: FEHLER ( unverständlich )	321	Andy288bln	08.12.03 18:19
Re: FEHLER ( unverständlich )	322	Danzi	08.12.03 18:26
Re: FEHLER ( unverständlich )	298	Andy288bln	08.12.03 20:16
Re: FEHLER ( unverständlich )	327	Andy288bln	08.12.03 20:13
Re: FEHLER ( unverständlich )	345	Danzi	08.12.03 20:17
Re: FEHLER ( unverständlich )	321	Andy288bln	08.12.03 20:21
Re: FEHLER ( unverständlich )	323	Danzi	08.12.03 20:25
Re: FEHLER ( unverständlich )	334	Andy288bln	08.12.03 20:30
Re: FEHLER ( unverständlich )	314	Danzi	08.12.03 20:34
Re: FEHLER ( unverständlich )	355	Danzi	08.12.03 20:46
Re: FEHLER ( unverständlich )	404	Andy288bln	08.12.03 23:20
Re: FEHLER ( unverständlich )	315	Danzi	09.12.03 11:42

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