首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

怎么将字符串变量转为控件名称,对相应控件进行操作

2012-01-15 
如何将字符串变量转为控件名称,对相应控件进行操作我希望能够写一个搜索功能的公用窗体,别的地方可以调用

如何将字符串变量转为控件名称,对相应控件进行操作
我希望能够写一个搜索功能的公用窗体,别的地方可以调用这个窗体,并把调用位置通过字符串变量TG告诉它。这个窗体操作完,将结果返回给调用位置。
例如,字符串TG= "frmMain.txtFileName ",表示是frmMain窗体的txtFileName调用搜索窗体。那么搜索窗体应该把结果返回给frmMain.txtFileName。
这个结果(或者说对调用位置的操作)可能比较复杂,我希望能有一个简单的办法,比如JS语言的eval(字符串变量)这样的方式。vb里面是否有对应的语法?谢谢!

[解决办法]
Option Explicit

Private Declare Function EbExecuteLine Lib "vba6.dll " ( _
ByVal pStringToExec As Long, _
ByVal Unknownn1 As Long, _
ByVal Unknownn2 As Long, _
ByVal fCheckOnly As Long) As Long

Private Sub Form_Load()
EbExecuteLine StrPtr( "dim a as long,b as long,c as long "), 0, 0, 0
EbExecuteLine StrPtr( "a= " & 3), 0, 0, 0
EbExecuteLine StrPtr( "b= " & 5), 0, 0, 0
EbExecuteLine StrPtr( "c= " & 2), 0, 0, 0
EbExecuteLine StrPtr( "clipboard.settext (a+b)/c "), 0, 0, 0
MsgBox Clipboard.GetText
End Sub

热点排行