Feedback

VB - Nachkommastellen Wert erfahren

Veröffentlicht von am 23.09.2008
(1 Bewertungen)
Gibt den Wert zurück nach ohne ganze Zahlen ist.
GFU-Schulungen  [Anzeige]

C# 2019/2017/2015 Aufbau

In dieser Schulung lernen Sie fortgeschrittene Techniken im Bereich .Net C#. Dabei stehen neben den eigentlichen Techniken auch architektonische Aspekte im Mittelpunkt.

VB.NET Einführung

Die Schulung zeigt Ihnen, wie Sie einfache, benutzerorientierte Programme, die auf Datenbanken zugreifen, in VB.NET eigenständig entwickeln. 

Public Function GetDecimals(ByVal V As Single) As Single
                Dim i As Integer = Global.System.Math.Truncate(V)
                Return V - i
            End Function

            Public Function GetDecimals(ByVal V As Double) As Double
                Dim i As Integer = Global.System.Math.Truncate(V)
                Return V - i
            End Function

1 Kommentare zum Snippet

SAN-Software schrieb am 23.09.2008:
Man kann das eigentlich noch kürzer schreiben. Wozu die Variable I definieren?

 
Public Function GetDecimals(ByVal V As Double) As Double
Return V - Global.System.Math.Truncate(V)
End Function
 

Logge dich ein, um hier zu kommentieren!