发布网友
共1个回答
热心网友
Option
Explicit
Private
Sub
Form_Load()
MsgBox
Add(1,
2)
'函数调用
End
Sub
Function
Add(a
As
Double,
b
As
Double)
As
Double'函数定义
Add
=
a
+
b
End
Function
'你可以按f8
单步运行就可以调试了