以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  tabcontrol控件问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=139657)

--  作者:hebxtshhyj
--  发布时间:2019/8/18 16:45:00
--  tabcontrol控件问题
把一个独立窗口加入到tabcontrol控件中,打开后为什么独立窗口内容显示不全了呢?
--  作者:y2287958
--  发布时间:2019/8/18 18:57:00
--  
独立窗口加入到tabcontrol控件中?
--  作者:有点蓝
--  发布时间:2019/8/18 20:00:00
--  
把窗口自动滚动设置为true
--  作者:hebxtshhyj
--  发布时间:2019/8/20 10:56:00
--  

不行呀。


--  作者:hebxtshhyj
--  发布时间:2019/8/20 10:59:00
--  

就按照这样子。

 

 

Dim tbc As WinForm.TabControl = Forms("主窗口").Controls("Tabmain")
Dim Name As String = args(0)  \'窗口名称
Dim tp As String = args(1)  \'图片名称
For Each pg As WinForm.TabPage In tbc.TabPages
    If pg.Name = name Then
        tbc.SelectedPage = tbc.TabPages( name)
        Return Nothing
    End If
Next
tbc.TabPages.Add(name,name)
Dim pb = tbc.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.add(Forms(Name).BaseForm)
tbc.SelectedPage = tbc.TabPages( name)
tbc.SelectedPage.Image=GetImage(args(1))

 

 

 

独立窗口加入后下面的内容都不能显示。


--  作者:有点蓝
--  发布时间:2019/8/20 11:16:00
--  
上传实例说明
--  作者:hebxtshhyj
--  发布时间:2019/8/20 17:36:00
--  

[此贴子已经被作者于2019/8/21 11:14:43编辑过]

--  作者:有点蓝
--  发布时间:2019/8/20 20:16:00
--  
哪一个窗口有问题?
--  作者:hebxtshhyj
--  发布时间:2019/8/21 9:15:00
--  

订房单,收款单,房源信息 ,加载到tabcontrol中,下面有内容的都看不到。

[此贴子已经被作者于2019/8/21 9:23:50编辑过]

--  作者:hebxtshhyj
--  发布时间:2019/8/21 9:28:00
--  看看
怎么上传图片图片点击可在新窗口打开查看
[此贴子已经被作者于2019/8/21 9:42:49编辑过]