Imports System
Public Class Program
Public Shared Sub Main()
Dim number As Double = 8274.0
Dim percentage As Double = 11.0 ' // 11% of 8274 = 910.14
Dim result As Double = (percentage / 100.0) * number
Console.WriteLine(result)
End Sub
End Class
' run:
'
' 910.14
'