以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口代码错误  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=75934)
--  作者：kaituozhe
--  发布时间：2015/10/18 8:11:00
--  窗口代码错误

我在另外一个窗口中可以使用的代码，到这里窗口就这样提示的不知道是什么原因

Dim tab As winform.tabcontrol=e.Form.controls("tabcontrol3")
If tab.tabpages("窗口1") IsNot Nothing Then
    tab.Selectedpage = tab.tabpages("窗口1")
Else
    Dim name As String = "窗口1"
    tab.tabpages.Add(name,name)
    Dim pb =tab.basecontrol
    Forms(name).open(-1000,-1500)
    Forms(name).baseform.Toplevel = False
    Forms(name).baseform.Formborderstyle = system.windows.Forms.Formborderstyle.none
    Forms(name).baseform.Dock = system.windows.Forms.dockstyle.fill
    pb.tabpages(name).controls.clear
    pb.tabpages(name).controls(Forms(name).baseform)
    tab.Selectedpage = tab.tabpages(name)
End If

.NET Framework 版本：2.0.50727.5420
Foxtable 版本：2014.11.11.1
错误所在事件：窗口,主窗口,Button6,Click
详细错误信息：
未将对象引用设置到对象的实例。

.NET Framework 版本：2.0.50727.5420
Foxtable 版本：2014.11.11.1
错误所在事件：窗口,主窗口,Button5,Click
详细错误信息：
重载决策失败，因为没有可访问的“controls”接受此数目的参数。
--  作者：大红袍
--  发布时间：2015/10/18 10:35:00
--  

汗

 

pb.tabpages(name).controls.add(Forms(name).baseform)
--  作者：kaituozhe
--  发布时间：2015/10/18 10:36:00
--  
该怎么改呀
--  作者：kaituozhe
--  发布时间：2015/10/18 10:51:00
--  
通过上述代码打开新窗口时，新窗口动态加载的控件也加载不进来，该怎么处理
--  作者：kaituozhe
--  发布时间：2015/10/18 11:22:00
--  
打开主窗口，然后再在主窗口中打开高级筛选，打开高级筛选窗口中的按钮后关闭时提示错误，该怎么处理
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:产品5.zip
--  作者：大红袍
--  发布时间：2015/10/18 12:30:00
--  
以下是引用kaituozhe在2015/10/18 10:51:00的发言：
通过上述代码打开新窗口时，新窗口动态加载的控件也加载不进来，该怎么处理

 

汗，

 

pb.tabpages(name).controls.add(Forms(name).baseform)
--  作者：大红袍
--  发布时间：2015/10/18 12:31:00
--  

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=75900

 
--  作者：kaituozhe
--  发布时间：2015/10/18 14:55:00
--  

Dim tab As winform.tabcontrol=e.Form.controls("tabcontrol3")
If tab.tabpages("窗口1") IsNot Nothing Then
tab.Selectedpage = tab.tabpages("窗口1")
Else
Dim name As String = "窗口1"
tab.tabpages.Add(name,name)
Dim pb =tab.basecontrol
Forms(name).open(-1000,-1500)
Forms(name).baseform.Toplevel = False
Forms(name).baseform.Formborderstyle = system.windows.Forms.Formborderstyle.none
Forms(name).baseform.Dock = system.windows.Forms.dockstyle.fill
pb.tabpages(name).controls.clear
pb.tabpages(name).controls(Forms(name).baseform)
tab.Selectedpage = tab.tabpages(name)
End If


 

.NET Framework 版本：2.0.50727.5420
Foxtable 版本：2014.11.11.1
错误所在事件：窗口,主窗口,Button5,Click
详细错误信息：
重载决策失败，因为没有可访问的“controls”接受此数目的参数。

 

这段代码有什么问题吗？我是在一个窗口中打开另外一个窗口，打开时有以上提示

 
--  作者：大红袍
--  发布时间：2015/10/18 14:56:00
--  

无语

 

pb.tabpages(name).controls.add(Forms(name).baseform)
--  作者：kaituozhe
--  发布时间：2015/10/18 15:00:00
--  

需要怎么改呀，帮助又类似的案例，这段代码在另外一个项目是可以的，