文件名称：调用函数-AO编程基础
文件大小：198KB
文件格式：PPT
更新时间：2024-05-13 14:54:44
arcgis AO vba
调用函数 Private Sub Start () Dim n As Integer Dim dd As Double n = InputBox(“Type a number”) ' Call the Inverse function and assign the return value to dd. dd = Inverse (n) MsgBox “The inverse of the number is: “ & dd End Sub Private Function Inverse (m) As Double Dim d As Double d = 1 / m Inverse = d ' Return the d value. End Function