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: Preisser
Datum: 21.11.10 12:19

Hallo,

also ich wüsste nicht, wo da Ziffern abgschnitten werden sollen. Das Problem ist halt, dass es auf amerikanischen Systemen dann nicht klappt, weil da die Val-Funktion den Punkt als Dezimaltrennzeichen erkennt. Und der Logarithmus ist nicht immer ganz exakt, da er über eine Näherungsfunktion berechnet wird.

Aber nochmal: Die beste Methode wäre hier, die Zahl so lange durch 10 zu teilen, bis sie eben kleiner 10 ist. Die Umwandlung in einen String, da ein Komma reinzusetzen und wieder in eine Zahl umzuwandeln ist 1. ein schlechter Programmierstil und bringt 2. eine Reihe Probleme mit sich.


Dim Zahl1 As Double, Zahl2 As Double
Zahl1 = 12345441
 
Zahl2 = Zahl1
Do While (Abs(Zahl2) >= 10)
    Zahl2 = Zahl2 / 10
Loop
Damit teilst du die Zahl so lange durch 10, bis der Betrag kleiner als 10 ist.

Allerdings frage ich mich, wozu das gut sein soll, eine Zahl so umzuwandeln, dass nach der 1. Ziffer das Dezimaltrennzeichen kommt?

Beitrag wurde zuletzt am 21.11.10 um 12:44:23 editiert.
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 umwandeln904Preisser21.11.10 12:19
Re: 143253=>1.4325 auto umwandeln816ElTosalet21.11.10 13:45
Re: 143253=>1.4325 auto umwandeln785Preisser21.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