已知一文件夹下有一个VB6.0的工程和窗体文件,该窗体上有一个文本框控件。欲通过另外的一个程序判断该窗体上是否存在该文本框,如果存在再判断该控件的属性。
我的想法是先通过一个 程序使该工程运行,然后可以判断窗体上的控件及属性,但是我现在不知道怎样在一个程序里调用*.VBP文件,还有我还没想明白如何读取、判断控件的相关代码。
请各位贤人帮忙,帖子贴了四个,两天,一点头绪没有,急人啊!!!
我的想法是先通过一个 程序使该工程运行,然后可以判断窗体上的控件及属性,但是我现在不知道怎样在一个程序里调用*.VBP文件,还有我还没想明白如何读取、判断控件的相关代码。
请各位贤人帮忙,帖子贴了四个,两天,一点头绪没有,急人啊!!!
Dim x As String
Open App.Path & "\xxxx.frm" For Input As #1
x = StrConv(InputB(LOF(1), 1), vbUnicode)
Close #1
If InStr(x, "Begin VB.TextBox Text1") > 0 Then
x = Split(x, "Begin VB.TextBox Text1")(1)
x = Split(x, "End")(0)
x = "Text1:" & vbCrLf & x
MsgBox x
Else
MsgBox "没发现text1文本框!"
End If
End Sub