UC知道用vb 怎么自己编写一个函数？
来源：百度知道 编辑：UC知道 时间：2024/05/17 06:13:26
我是一个VB新手 好多地方都不懂 。请问下 用vb 怎么自己编写一个函数？ 还要有什么格式吗？如果有具体怎么写？VB自己能创建函数吗？我只知道VB能调用外部函数，不知道自己怎么编写一个自己需要的函数？例如 编写一个 像按键精灵 里面的找图函数 findpic（ 一些参数。。。） 那样的!谢谢！！QQ 271072330
给你一个简单例子，作用是查找一个数组里的最大数。
在工程里添加一个标准模块，再再里加入：
Function maxNum(x() as double) as double
dim i as integer
maxNum=x(lBound(x())
for i=lbound(x()) to ubound(x())
if maxNum<x(i) then maxNum=x(i)
next
End Function
这样你就可以在程序里任何地方使用它了。
作用是查找一个数组里的最大数。
在工程里添加一个标准模块，再再里加入：
Function maxNum(x() as double) as double
dim i as integer
maxNum=x(lBound(x())
for i=lbound(x()) to ubound(x())
if maxNum<x(i) then maxNum=x(i)
next
End Function