vb 自定义函数？

Question

我想自写一个函数，存放一些坐标之类的信息，情况不同时调用不同的函数。我是个新手，想请教一下，这类的自定义函数怎么写？调用的方法是什么？
例如定义一个名为cd的函数，具体怎么写？然后怎么调用cd？

Answer 1

比如 求两个数的和的Function add(a ,b )　　　　＇建立一个 add () 函数add=a+bEnd FunctionPrivate Sub Form_Click()Print add(8, 9)End Sub运行程序，点击一下窗体，就得到结果 17知识小贴：　　　函数是有返回值的，过程没有返回值。

Answer 2

1、函数不是用来存放信息的，是用来处理信息的。2、要根据坐标不同调用不同函数，你可以写一个主函数，再写几个不同的子函数。示范如下：Private Sub 坐标调用主程序(x As Long, y As Long)If x > 100 And y > 100 Then Call 调用1(x, y)If x > 100 And y < 100 Then Call 调用2(x, y)'N个条件自己添加，对应N个调用函数End&nbsp;SubPrivate Sub 调用1(x As Long, y As Long)'程序省略End SubPrivate Sub 调用2(x As Long, y As Long)'程序省略End Sub