Dim str As String
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)str = "Form2" '必须是 命名空间+点+窗体类名(这里假设为命名空间为空)
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)Dim tempAssembly As [Assembly] = [Assembly].GetExecutingAssembly()
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)Dim t As Type = tempAssembly.GetType(str)
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)Dim args() As Object = Nothing
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)Dim o As Object = System.Activator.CreateInstance(t, args)
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)CType(o, Form2).Show()
(本文来源于图老师网站,更多请访问http://m.tulaoshi.com)(本文来源于图老师网站,更多请访问http://m.tulaoshi.com) 展开更多 (50%) 分享