渐开线函数模块.bas
来自「一个设计齿轮变位系数的程序」· BAS 代码 · 共 7 行
BAS
7 行
Attribute VB_Name = "渐开线函数模块"
Option Explicit
Dim a0 As Double
Public Function inv(ByVal a0) As Double
inv = Tan(a0) - a0
End Function
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?