主题：获取字符串对应变量值？

如题，定义了全局变量“_username”

现将全局变量以字符串格式传递给自定义函数，要求能根据string型“_username”返回其实际值，应该怎么实现？

Dim s As String = "owner Is null Or owner not Like 【var0】_UserOwner【var1】"

直接上例子把，如上字符串，怎么解析为“"owner Is null Or owner not Like ‘实际值’“

【var0】_UserOwner【var1】

以上告诉程序：这是一个一个变量，然后程序就会把他解析为实际值，并替换掉

1、截取字符串

Dim s As String = "owner Is null Or owner not Like 【var0】_UserOwner【var1】"

Dim st As Integer = s.IndexOf("】")
Dim en As Integer = s.LastIndexOf("【")
msgbox(s.SubString(st+1, En-st-1))

2、直接写 Dim s As String = "owner Is null Or owner not Like '" & _UserOwner & "'"

3、可以用动态编译的方式

http://www.foxtable.com/help/topics/1487.htm

第一种方式，通过字符串处理获取了”_UserOwner“，但是不知怎么转化为实际值？

第二种方式，因为应用环境不允许，无法采用

第三种方式，可行，但动态编译影响系统性能

甜甜版主，不知第一种方式能否解决？否则只能用第三种方式了

 如果要用字符串当代码来用，就必须动态编译。

 不然，就只能是把代码写死，视你具体的问题而定。

Dim s As String = args(0)
Dim filter As String = s.Replace("【v0】_UserOwner【v1】",_UserOwner)
Return filter

哦，因为涉及到的变量不多，基本跟用户有关，所以做了这边函数做特殊情况解析，变通解决了

谢谢田版