Question

How to find the highest digit in Integer number with VB.NET

Answer 1

Imports System
 
Public Class Test
    Public Shared Function getTheHighestDigit(n As Integer) As Integer
        Dim max As Integer = 0
        Do While(n <> 0) 
            If (n Mod 10 > max) Then
                max = n Mod 10
            End If
            n = Int(n / 10)
        Loop
        return max
    End Function
    Public Shared Sub Main()
        Dim n As Integer = 213
        Console.WriteLine(getTheHighestDigit(n))
       
        n = 76594
        Console.WriteLine(getTheHighestDigit(n))
       
        n = 76852
        Console.WriteLine(getTheHighestDigit(n))
    End Sub
End Class
 
 
 
 
' run
'
' 3
' 9
' 8

 

70+ SQL courses for beginners and professionals