VB6中只能象以下这样 Public fMainForm As frmMain Sub Main() frmSplash.Show frmSplash.Refresh Set fMainForm = New frmMain Load fMainForm Unload frmSplash fMainForm.Show End Sub VB.NET才是完全面向对象!!!!!!
说清楚点啊 用来 做什么form1.xxxx就可以引用的啊!
我也想知道呢,不知道在VB中是不是不行,我最后没办法只能用 select case FormName . . .
想了想,我没办法直接用,forms不支持字符串参数:(
用控件集试试 DIM frmName as FROM DIM frmNow as FROM Private Sub Name(strName) 'strName是你的字符串也是窗体名 set frmName=new FROM set frmNow=new FROM for each frmName in FROMS if frmName.Caption=strName Then set frmNow=frmName Exit Sub End if next frmName End Sub
Public fMainForm As frmMain
Sub Main()
frmSplash.Show
frmSplash.Refresh
Set fMainForm = New frmMain
Load fMainForm
Unload frmSplash
fMainForm.Show
End Sub
VB.NET才是完全面向对象!!!!!!
select case FormName
.
.
.
DIM frmName as FROM
DIM frmNow as FROM
Private Sub Name(strName) 'strName是你的字符串也是窗体名
set frmName=new FROM
set frmNow=new FROM
for each frmName in FROMS
if frmName.Caption=strName Then
set frmNow=frmName
Exit Sub
End if
next frmName
End Sub
试试能不能用 frmNow.(Porperty)
访问该窗体的方法或属性
因为你得到窗体名称最多只是窗体对象的Caption属性的值,
没办法窥一斑而见全豹。
何况你知道窗体名称,你自己知道这个窗体对象的接口,
但是系统知道了名称字符串没办法确定接口,不能调用相应的属性。
逻辑上应该是说不过去的,
就象是我告诉你一个粒子加速器的名称然后问你用法一样。
不知道你试过没有。
没有在VB上试过就不要那么肯定。