Imports SystemImports Microsoft.VisualBasicModule DemoTanh Sub Main() Dim tanhArg As Double = Math.Tanh(0.5) Console.WriteLine(tanhArg) End Sub End Module