主题：[原创]仿WIN8主题，求助

1、密码发上来；

2、最大化最小化

e.Form.BaseForm.windowstate = 0

e.Form.BaseForm.windowstate = 1

e.Form.BaseForm.windowstate = 2

3、变形什么意思。

 控件过多肯定会卡，每个功能单独做一个窗口，需要的时候，剪切进去。

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
Dim Name As String = "窗口2"

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.add(Forms(Name).BaseForm)
tab.SelectedPage = tab.TabPages(name)

直接设置就行，也就是某一列和另一列关联即可  http://www.foxtable.com/help/topics/2353.htm

没什么不对啊。

1、你窗口设计的时候高度要控制好；

2、如果原本就显示不全，最大化也显示不全啊。

那这个没有办法，自适应就是这样的。

就是按照比例缩放可扩展的。

参考 http://www.foxtable.com/help/topics/0348.htm