欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → VB函数如何返回两个值

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有2999人关注过本帖树形打印复制链接

主题:VB函数如何返回两个值

帅哥哟,离线,有人找我吗?
wjd
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:7 积分:0 威望:0 精华:0 注册:2015/4/29 9:34:33
VB函数如何返回两个值  发帖心情 Post By:2015/4/29 9:50:08 [只看该作者]

用VB编写函数,如何返回两个或两个以上的数值?

 

Function F1(Formula,P1,P2)

    Dim i

 

    i=.......

 

 

     F1=i


End Function

这样只能返回一个值,如何返回两个值?例如,我想输入一个值,返回该值的3倍和4倍值

Function F1(Formula,val)

    Dim i1 , i2

    i1 = val * 3

    i2 = val * 4

End Function

 

即返回值1=val * 3

   返回值2=val * 4

 


 回到顶部
帅哥哟,离线,有人找我吗?
王锋
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:罗宾汉 帖子:11808 积分:20695 威望:0 精华:10 注册:2009/8/18 8:15:13
  发帖心情 Post By:2015/4/29 11:23:34 [只看该作者]

可以使用全局变量数据库来进行变量中转的,参考

http://www.weistock.com/bbs/dispbbs.asp?BoardID=5&ID=63186&skin=0



金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
wjd
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:7 积分:0 威望:0 精华:0 注册:2015/4/29 9:34:33
  发帖心情 Post By:2015/4/29 15:39:54 [只看该作者]

我在函数中使用了全局变量

Function F1(Formula,val)

    Call Document.SetExtData("变量1",1000)

....

End Function

 

在公式中如何取得该变量值?


 回到顶部
帅哥哟,离线,有人找我吗?
王锋
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:罗宾汉 帖子:11808 积分:20695 威望:0 精华:10 注册:2009/8/18 8:15:13
  发帖心情 Post By:2015/4/29 20:26:29 [只看该作者]

请仔细翻阅下面4个函数的使用说明

 

EXTGBDATA( )
EXTGBDATASET( , )
EXTGBSTRING( )
EXTGBSTRINGSET( , )



金字塔—专业程序化软件提供商

金字塔-技术部

-----------------------------------------------------------------------------------------------------

工作时间:周一至周五 08:30 - 17:30   周末及法定节假日休息

Email:service@weistock.com
 回到顶部