WCM Forum

WCM Forum (http://www.wcm.at/forum/index.php)
-   Programmierung (http://www.wcm.at/forum/forumdisplay.php?f=17)
-   -   Visual Basic --> Kommastellen (http://www.wcm.at/forum/showthread.php?t=130614)

Potassium 08.04.2004 12:39

so versuche es mal damit:
Code:

Option Explicit

Private Sub Form_Load()
Dim Kommastellen, Begin, Zahl

Zahl = 2.589734567867
'Zahl = 2454541.2
Begin = InStr(1, Zahl, ",")
If Begin > 0 Then
    Kommastellen = Mid(Zahl, Begin + 1, 2)
Else
   
End If



If Len(Kommastellen) = 0 Then
    Kommastellen = "00"
ElseIf Len(Kommastellen) = 1 Then
    Kommastellen = Kommastellen & 0
End If

Zahl = Mid(Zahl, 1, Begin - 1)
Zahl = Zahl & "," & Kommastellen
MsgBox Zahl
End Sub

ich hoffe das ist was du brauchst

PunkTey 08.04.2004 12:39

ja die sache is halt die .. dass ich 93 preise habe die alle auf zwei dezimalstellen abgeschnitten gehören. dsehalb sollte s ned allzu viel aufwändig sein .. wei ldas coding sonst .. muha .. einfach zu viel wird :D

nur ich kann mit dem prog ned großartig weiter machen bzw. will es ned total durchprogrammieren, wenn ich dann vielleicht alle ausgaben umschreiben muss wegen diesem format befehl.

probier zwar auch schon seit geraumer zeit mit diesem format befehl rum, aber es funktioniert ned so .. wies sollte :D er rundet eben auf ne ganzzahl.

Potassium 08.04.2004 12:40

wie gefällt dir obere möglichkeit?

PunkTey 08.04.2004 12:41

hehe ist echt süß ... aba wenn ich das ganze für 93 beträge mach schau ich alt aus :D

Potassium 08.04.2004 12:42

warum bitte?
mach doch ne for-schleifen oä.
und bei 93 einträgen dauerts ned mal lang :D

Potassium 08.04.2004 12:44

ajo das eine else kannst ausse nehmen

PunkTey 08.04.2004 12:44

na ja .. also mir wäre so eine simple anweisung in der ausgabe lieber :D

sowas wie lblausgabe=~irgendeine formatierende anweisung~ Variable

sowas wär fein :D

aba mit so ner schleife etc. kann ich alles jetzt umprogrammieren und ich hab nimma so viel zeit für dieses projekt dass ich da von neu anfange :)

PunkTey 08.04.2004 12:46

ja und wo soll ich das einbauen?

weil die beträge werden in einem anderen formular eingegeben als sie ausgegeben werden. und die beträge sind alle in variablen drinnen .. und ich habe insgesamt .. 20 formulare wo beträge eingegeben werdn :D

Potassium 08.04.2004 12:47

aso na dann mach einfach ne funktion draus.

PunkTey 08.04.2004 12:57

und wie mach ich die funktion? lol ich bin ein total noob was visual basic angeht. ich mein ich versuchs halt immer so einfach wie möglich zu programmieren, auch wenn es pfuschig is :D aba meinem prof is egal wie ichs programmiere nur funken soll es

nur wie mach ich des mit ner funktion?
hab ja 93 verschiedene variablen :D


Alle Zeitangaben in WEZ +2. Es ist jetzt 11:54 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
© 2009 FSL Verlag