关于VB自定义函数的问题
小的不才,刚学VB不久,现在想自定义一个函数,在调用这个函数时,弹出另一个窗口,请问这个函数应该如何编写,这个程序很简单的,请会的高手指点下,定重谢!
[解决办法]
1)弹出另一个窗口一般无须使用函数,仅使用语句,假如你需弹出的窗口名为FORM2:
FORM2.SHOW
2)如你确需一个函数弹出另一个窗口,那也不是自定义的,用SHELL函数:
Shell 函数
执行一个可执行文件，返回一个 Variant (Double)，如果成功的话，代表这个程序的任务 ID，若不成功，则会返回 0。
Shell 函数示例
本示例使用 Shell 函数来完成一个用户指定的应用程序。
Dim RetVal
RetVal = Shell( "C:\WINDOWS\CALC.EXE ", 1) ' 完成Calculator。
3)按你要求将FORM2.SHOW放你自定义函数代码内的合适位置.
[解决办法]
他也许是要求用inputbox 函数 返回得到1个参数
比如这样
a = InputBox( "请输入参数 ")
[解决办法]
private sub form_load()
dim a1 as form1
set a1=new form1
form1.show
end sub
