主题：条件可否引用字符串？

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

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

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

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