- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [原创]仿WIN8主题，求助 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72234)
-- 发布时间：2015/7/26 14:59:00
-- [原创]仿WIN8主题，求助
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:实例.table |
此主题相关图片如下：1.png
求问：
1、这样设计会导致系统卡顿吗？？
2、最小化键代码不知道？？
3、最大化时设计变形
-- 发布时间：2015/7/26 15:08:00
--
1、密码发上来；
2、最大化最小化
e.Form.BaseForm.windowstate = 0
e.Form.BaseForm.windowstate = 1
e.Form.BaseForm.windowstate = 2
3、变形什么意思。
-- 发布时间：2015/7/26 15:10:00
-- 回复：（大红袍）1、密码发上来； 2、最大化...
忘了发密码了，老师，实在抱歉
密码0525
变形是最大化时不会按比例放大
-- 发布时间：2015/7/26 15:27:00
-- 回复：（aizaishuzui）回复：（大红袍）1、密码发上来...
老师:
e.Form.BaseForm.windowstate = 1是最小化e.Form.BaseForm.windowstate = 2是最大化
e.Form.BaseForm.windowstate = 0是什么
为什么最小化不能向普通程序一样在任务栏有图标？？
-- 发布时间：2015/7/26 15:28:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:实例.table |
-- 发布时间：2015/7/26 15:41:00
-- 回复：（大红袍） [upload=table,实例.table]vie...
老师我爱死你了，对了，这个控件太多会不会卡顿
-- 发布时间：2015/7/26 15:45:00
--
控件过多肯定会卡，每个功能单独做一个窗口，需要的时候，剪切进去。
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)
-- 发布时间：2015/7/26 16:03:00
-- 回复：（大红袍） 控件过多肯定会卡，每个功能单...
老师，请教一下，上面代码我看不懂，因为是学企业管理的，还是在校生，想问一下狐表用到的是VB的语言吗？我要往这方面发展应该去学哪一个？麻烦您了
-- 发布时间：2015/7/26 16:05:00
--
vb.net 语法，你可以找本书学。
-- 发布时间：2015/7/26 16:06:00
-- 回复：（大红袍）vb.net 语法，你可以找本书学。
好滴，非常感谢！