Foxtable(狐表)用户栏目专家坐堂 → 条件可否引用字符串?


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

主题:条件可否引用字符串?

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


加好友 发短信
等级:二尾狐 帖子:585 积分:5674 威望:0 精华:0 注册:2014/5/21 10:30:00
条件可否引用字符串?  发帖心情 Post By:2014/8/21 12:31:00 [只看该作者]

如题,设置条件为 i > 0 , 在某一情况下,又得设置为 i < 0 , 

现想把条件存到某一string变量j里面(j=">0"),通过类似 i & j 调用, 能否实现类似功能?


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


加好友 发短信
等级:二尾狐 帖子:585 积分:5674 威望:0 精华:0 注册:2014/5/21 10:30:00
  发帖心情 Post By:2014/8/21 12:54:00 [只看该作者]

想到了此种动态编译的方法,不知还有没更好方法?

Dim Code As String          
                Code = "Dim n As Integer = " & n & vbcrlf
                Code = Code & "return " & tr("添加条件")
                Functions.remove("动态比较")
                Functions.Add("动态比较",Code)
                Functions.Complie()                     
                If Functions.Execute("动态比较")

                    Forms(导航窗口).Controls(任务栏).Pages(tr("页面索引")).links.Add(tr("任务ID"),n & "_" & tr("任务名"))
                End If


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/21 13:28:00 [只看该作者]

 如果判断不多,就尽量把代码写死,具体提问题,实例说明。

 回到顶部