vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Top-Preis! AP-Access-Tools-CD Volume 1  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: 143253=>1.4325 auto umwandeln 
Autor: ElTosalet
Datum: 18.11.10 16:41

Es geht auch so ganz einfach:

Private Sub cmdGo_Click()
Dim AltZahl&, Z1$, NeuZahl!, Z2$, KPos%
AltZahl = 1234567
KPos = 3 ' -- Position, wo das Komma stehen soll
' -- AltZahl in String Z1 wandeln
Z1 = CStr(AltZahl)
' -- String Z1 aufspalten in Vor- und Nachkommastellen,
' Komma einfügen und alles zusammensetzen als Z2
Z2 = Left(Z1, KPos) + "," + Right(Z1, Len(Z1) - KPos + 1)
' -- String in Zahl wandeln
NeuZahl = CSng(Z2)
End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
143253=>1.4325 auto umwandeln1.239marvin_9408.11.10 14:21
Re: 143253=>1.4325 auto umwandeln875Manfred X08.11.10 15:07
Re: 143253=>1.4325 auto umwandeln825marvin_9409.11.10 18:14
Re: 143253=>1.4325 auto umwandeln898Radames09.11.10 19:05
Re: 143253=>1.4325 auto umwandeln882marvin_9409.11.10 19:16
Re: 143253=>1.4325 auto umwandeln866marvin_9409.11.10 19:20
Re: 143253=>1.4325 auto umwandeln881ElTosalet18.11.10 16:41
Re: 143253=>1.4325 auto umwandeln868Preisser18.11.10 17:49
Re: 143253=>1.4325 auto umwandeln885marvin_9421.11.10 10:15
Re: 143253=>1.4325 auto umwandeln903Preisser21.11.10 12:19
Re: 143253=>1.4325 auto umwandeln815ElTosalet21.11.10 13:45
Re: 143253=>1.4325 auto umwandeln784Preisser21.11.10 15:45

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel