Imports System
Public Class Program
Public Shared Sub Main()
Dim numerator As Double = 3
Dim denominator As Double = 4
Dim percentage As Double = (numerator / denominator) * 100
Console.WriteLine("The percentage is: " & percentage & "%")
End Sub
End Class
' run:
'
' The percentage is: 75%
'