Label.Caption addieren

Forumthread: Label.Caption addieren
4 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Label.Caption addieren

11.01.2003 16:48:36

H.- Udo

Hallo,

wie kann ich Werte in Labeln addieren?

Private Sub CommandButton_Eingabe_Berechnen_Click()
Label91.Caption = CStr("0,13000")
Label97.Caption = CStr("0,17000")
Label256.Caption = Format((Label91.Caption + Label97.Caption), "#.########0.00000000")
End Sub

Mein Code gibt immer die beiden Inhalte hintereinander, aber nicht als Summe wieder.

Vorab vielen Dank für Eure Hilfe

H.- Udo

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: Label.Caption addieren

11.01.2003 17:08:05

L.Vira
Re: Label.Caption addieren

11.01.2003 17:24:44

H.- Udo
Re: Label.Caption addieren

11.01.2003 17:31:26

L.Vira
Funktioniert! Danke !!!

11.01.2003 17:36:26

H.- Udo

Re: Label.Caption addieren

11.01.2003 17:08:05

L.Vira

Du machst aus der Caption, die ohnehing ein String ist nochmal mit CStr einen String. Texte können nicht addiert werden.

Re: Label.Caption addieren

11.01.2003 17:24:44

H.- Udo

Hallo,

mit "CLng(..)" gib er mir immer nur "0".
wenn ich in Label256 "Cstr(..)" weglasse, gibt er mir auch nur die hintereinander geschriebenen Zahlen.

Was kan ich denn machen, damit er mir die Summe der Zahlen gibt?

Gruß
H.- Udo

Re: Label.Caption addieren

11.01.2003 17:31:26

L.Vira

Option Explicit
Private Sub CommandButton_Eingabe_Berechnen_Click()
Label91.Caption = "0,13000"
Label97.Caption = "0,17000"
Label256.Caption = CDbl(Label91.Caption) + CDbl(Label97.Caption)
Label256.Caption = Format(Label256.Caption, "#,###,###,##0.0000")
End Sub

Funktioniert! Danke !!!

11.01.2003 17:36:26

H.- Udo

Hallo,
seit gut 1 Uhr heut mittag versuche ich das hinzubekommen .....

Vielen Dank
Gruß
H.- Udo