以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于全屏程序  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=34373)

--  作者:ttitt147
--  发布时间:2013/6/6 14:50:00
--  关于全屏程序

请教如何做全屏啊?只有最大化,还是能看到系统开始菜单。


--  作者:Bin
--  发布时间:2013/6/6 14:59:00
--  
窗口ALterLoad事件中加入如下代码
Dim wf As System.Windows.Forms.Form = e.Form.baseform
wf .ControlBox = False
wf .FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
wf .MaximizeBox = False
wf .MinimizeBox = False
wf .StartPosition = System.Windows.Forms.FormStartPosition.Manual
wf .Text = ""
wf .WindowState = System.Windows.Forms.FormWindowState.Maximized

--  作者:gsnake
--  发布时间:2013/6/6 21:01:00
--  
学习学习
--  作者:unverse
--  发布时间:2013/6/6 21:21:00
--  
e.Form.BaseForm.WindowState = System.Windows.Forms.FormWindowState.Maximized
--  作者:VIP用户
--  发布时间:2013/6/7 0:13:00
--  
以下是引用Bin在2013-6-6 14:59:00的发言:
窗口ALterLoad事件中加入如下代码
Dim wf As System.Windows.Forms.Form = e.Form.baseform
wf .ControlBox = False
wf .FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
wf .MaximizeBox = False
wf .MinimizeBox = False
wf .StartPosition = System.Windows.Forms.FormStartPosition.Manual
wf .Text = ""
wf .WindowState = System.Windows.Forms.FormWindowState.Maximized

谢谢分享, 建议注释说明每行代码的功能!

[此贴子已经被作者于2013-6-7 0:13:53编辑过]

--  作者:VIP用户
--  发布时间:2013/6/7 0:14:00
--  
以下是引用unverse在2013-6-6 21:21:00的发言:
e.Form.BaseForm.WindowState = System.Windows.Forms.FormWindowState.Maximized

谢谢分享!


--  作者:ttitt147
--  发布时间:2013/6/7 9:29:00
--  
感谢,不过这是窗口全屏吧,我发布和程序如何直接就是全屏啊