Foxtable(狐表)用户栏目专家坐堂 → 求助怎么写这个函数?


  共有1592人关注过本帖平板打印复制链接

主题:求助怎么写这个函数?

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


加好友 发短信
等级:小狐 帖子:349 积分:2993 威望:0 精华:0 注册:2018/3/15 16:46:00
求助怎么写这个函数?  发帖心情 Post By:2019/10/10 12:48:00 [只看该作者]

我想写这么一个函数:

我通过参数1传进去一个数组,通过参数2的值计算,通过参数3 确定正反。

比如我传进去这么一个数组,

Dim s1() As String = {"命宫","父母","福德","田宅","官禄","仆役","迁移","疾厄","财帛","子女","夫妻","兄弟"}

如果我参数2的值是5,参数3为0代表正转,那么返回的数组是以下内容:

{"财帛","子女","夫妻","兄弟","命宫","父母","福德","田宅","官禄","仆役","迁移","疾厄"}

再如我参数2的值是5,参数3为1代表反转.那么返回的数组是以下内容:

{"官禄,"田宅","福德","父母","命宫","兄弟","夫妻","子女","财帛","疾厄","迁移","仆役"}

请问该如何写这个函数?


 回到顶部