本文整理汇总了VB.NET中System.Math.Tanh方法的典型用法代码示例。如果您正苦于以下问题：VB.NET Math.Tanh方法的具体用法？VB.NET Math.Tanh怎么用？VB.NET Math.Tanh使用的例子？那么恭喜您, 这里精选的方法代码示例或许可以为您提供帮助。您也可以进一步了解该方法所在类System.Math的用法示例。
在下文中一共展示了Math.Tanh方法的1个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: DemoTanh
' Example for the hyperbolic Math.Tanh( Double ) method.
Module DemoTanh
Sub Main()
Console.WriteLine( _
"This example of hyperbolic Math.Tanh( Double )" & _
vbCrLf & "generates the following output.")
Console.WriteLine( _
vbCrLf & "Evaluate these hyperbolic " & _
"identities with selected values for X:")
Console.WriteLine(" tanh(X) = sinh(X) / cosh(X)")
Console.WriteLine(" tanh(2 * X) = 2 * tanh(X) / (1 + tanh^2(X))")
UseTanh(0.1)
UseTanh(1.2)
UseTanh(4.9)
Console.WriteLine( _
vbCrLf & "Evaluate [tanh(X + Y) == (tanh(X) + " & _
"tanh(Y)) / (1 + tanh(X) * tanh(Y))]" & _
vbCrLf & "with selected values for X and Y:")
UseTwoArgs(0.1, 1.2)
UseTwoArgs(1.2, 4.9)
End Sub
' Evaluate hyperbolic identities with a given argument.
Sub UseTanh(arg As Double)
Dim tanhArg As Double = Math.Tanh(arg)
' Evaluate tanh(X) = sinh(X) / cosh(X).
Console.WriteLine( _
vbCrLf & " Math.Tanh({0}) = {1:E16}" & _
vbCrLf & " Math.Sinh({0}) / Math.Cosh({0}) = {2:E16}", _
arg, tanhArg, Math.Sinh(arg) / Math.Cosh(arg))
' Evaluate tanh(2 * X) = 2 * tanh(X) / (1 + tanh^2(X)).
Console.WriteLine( _
" 2 * Math.Tanh({0}) /", _
arg, 2.0 * tanhArg)
Console.WriteLine( _
" (1 + (Math.Tanh({0}))^2) = {1:E16}", _
arg, 2.0 * tanhArg /(1.0 + tanhArg * tanhArg))
Console.WriteLine( _
" Math.Tanh({0}) = {1:E16}", _
2.0 * arg, Math.Tanh((2.0 * arg)))
End Sub
' Evaluate a hyperbolic identity that is a function of two arguments.
Sub UseTwoArgs(argX As Double, argY As Double)
' Evaluate tanh(X + Y) = (tanh(X) + tanh(Y)) / (1 + tanh(X) * tanh(Y)).
Console.WriteLine( _
vbCrLf & " (Math.Tanh({0}) + Math.Tanh({1})) /" & _
vbCrLf & "(1 + Math.Tanh({0}) * Math.Tanh({1})) = {2:E16}", _
argX, argY, (Math.Tanh(argX) + Math.Tanh(argY)) / _
(1.0 + Math.Tanh(argX) * Math.Tanh(argY)))
Console.WriteLine( _
" Math.Tanh({0}) = {1:E16}", _
argX + argY, Math.Tanh(argX + argY))
End Sub
End Module 'DemoTanh
' This example of hyperbolic Math.Tanh( Double )输出：
Evaluate these hyperbolic identities with selected values for X: tanh(X) = sinh(X) / cosh(X) tanh(2 * X) = 2 * tanh(X) / (1 + tanh^2(X)) Math.Tanh(0.1) = 9.9667994624955819E-002 Math.Sinh(0.1) / Math.Cosh(0.1) = 9.9667994624955819E-002 2 * Math.Tanh(0.1) / (1 + (Math.Tanh(0.1))^2) = 1.9737532022490401E-001 Math.Tanh(0.2) = 1.9737532022490401E-001 Math.Tanh(1.2) = 8.3365460701215521E-001 Math.Sinh(1.2) / Math.Cosh(1.2) = 8.3365460701215521E-001 2 * Math.Tanh(1.2) / (1 + (Math.Tanh(1.2))^2) = 9.8367485769368024E-001 Math.Tanh(2.4) = 9.8367485769368024E-001 Math.Tanh(4.9) = 9.9988910295055444E-001 Math.Sinh(4.9) / Math.Cosh(4.9) = 9.9988910295055433E-001 2 * Math.Tanh(4.9) / (1 + (Math.Tanh(4.9))^2) = 9.9999999385024030E-001 Math.Tanh(9.8) = 9.9999999385024030E-001 Evaluate [tanh(X + Y) == (tanh(X) + tanh(Y)) / (1 + tanh(X) * tanh(Y))] with selected values for X and Y: (Math.Tanh(0.1) + Math.Tanh(1.2)) / (1 + Math.Tanh(0.1) * Math.Tanh(1.2)) = 8.6172315931330645E-001 Math.Tanh(1.3) = 8.6172315931330634E-001 (Math.Tanh(1.2) + Math.Tanh(4.9)) / (1 + Math.Tanh(1.2) * Math.Tanh(4.9)) = 9.9998993913939649E-001 Math.Tanh(6.1) = 9.9998993913939649E-001