Question

How to extract the int part and the decimal part from float number in VB.NET

Answer 1

Imports System
  
Public Class Test
    Public Shared Sub Main()
        Dim f As Single = 7312.891
        Dim s As String = f.ToString()
        Dim int_part = Int(f)
        
        Console.WriteLine(int_part)
        Console.WriteLine(s.Substring(s.IndexOf(".") + 1))
    End Sub
End Class
  
  
  
  
' run:
'
' 7312
' 891
'

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System
  
Public Class Test
    Public Shared Sub Main()
        Dim f As Single = 732.891357
        Dim int_part As Integer = Int(f)
        Dim decimal_part As Single = f - Decimal.Truncate(int_part)
        
        Console.WriteLine(int_part)
        Console.WriteLine(decimal_part)
    End Sub
End Class
  
  
  
  
' run:
'
' 732
' 0.8913574
'

 

70+ SQL courses for beginners and professionals