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   RSS-Feeds  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2019
 
zurück

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

VB.NET - Ein- und Umsteiger
Re: Typumwandlung 
Autor: Manfred X
Datum: 04.10.19 17:17

Hallo!

Durch konsequente Nutzung der vielfältigen Framework-Methoden,
läßt sich der operative Prozess der Konvertierung deutlich vereinfachen:

  'Hier ggf. die korrekte Kultur der Datenquelle angeben
   Dim myNumberDecimalSeparatorChar As String =
   Globalization.CultureInfo.CurrentCulture.NumberFormat.NumberDecimalSeparator
 
   Dim Something As String = "180.41911364324 W"
 
   Dim myNumber As Decimal, myNumberRounded As Decimal
 
   If String.IsNullOrWhiteSpace(Something) Then
      MsgBox("Missing Chars")
   Else
      Dim mynumberstring As String =
          Something.Replace(".", myNumberDecimalSeparatorChar).Split(" ")(0)
 
      If Not Decimal.TryParse(myNumberString, myNumber) Then
         MsgBox("Conversion failed")
      Else
         myNumberRounded = _
            Math.Round(myNumber, 2, MidpointRounding.AwayFromZero)
            MsgBox("Conversion: " & myNumberRounded.ToString)
      End If
   End If
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Typumwandlung126Marty**03.10.19 15:33
Re: Typumwandlung56effeff03.10.19 19:18
Re: Typumwandlung44Manfred X04.10.19 17:17
Re: Typumwandlung39Kuno6004.10.19 22:02
Re: Typumwandlung36Manfred X04.10.19 23:29
Re: Typumwandlung32Marty**05.10.19 18:40
Re: Typumwandlung29effeff05.10.19 21:36
Re: Typumwandlung24Manfred X05.10.19 22:40

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-2019 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