Question

How to get the first digit of float number in VB.NET

Answer 1

Imports System

Public Class Test
    Public Shared Sub Main()
        Dim f As Single = 872.1459f
        Dim s As String = f.ToString()
 
        Console.Write(s(0))
    End Sub
End Class



' run:
'
' 8
'

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System
 
Public Class Test
    Public Shared Sub Main()
        Dim f As Single = 972.1459f
        Dim int_part = Int(f)
        Dim total_digits_minus_one As Integer = Int(Math.Log10(int_part))
        Dim first_digit As Integer = Int((int_part / Math.Pow(10, total_digits_minus_one)))
  
        Console.Write(first_digit)
    End Sub
End Class
 
 
 
' run:
'
' 9
'

 

70+ SQL courses for beginners and professionals