| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1037 人关注过本帖
标题:[求助]谁知道怎么让窗体满屏显示?
只看楼主 加入收藏
buck9527
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2004-10-31
收藏
 问题点数:0 回复次数:10 
[求助]谁知道怎么让窗体满屏显示?
我想让程序一运行就满屏显示窗体,不显示任务栏,应该怎么办啊!
搜索更多相关主题的帖子: 窗体 
2005-12-07 09:11
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
收藏
得分:0 

把Form的WindowState设置为2-最大化


天津网站建设 http://www./
2005-12-07 09:29
buck9527
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2004-10-31
收藏
得分:0 
我试过了,这样只是把窗体最大化了啊,任务栏还是会有。有没有办法不显示任务栏?
2005-12-07 10:22
slore
Rank: 5Rank: 5
等 级:贵宾
威 望:16
帖 子:1108
专家分:0
注 册:2005-7-1
收藏
得分:0 

不含标题窗体或showtask属性吧~忘了反正有这么个属性。。


快上课了……
2005-12-07 12:25
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
收藏
得分:0 
borderstyle变为0

天津网站建设 http://www./
2005-12-07 13:53
freeforever
Rank: 4
等 级:业余侠客
威 望:3
帖 子:368
专家分:201
注 册:2005-11-2
收藏
得分:0 
Private Sub Form_Initialize()
With Me
.Top = 0
.Left = 0
.Height = Screen.Height
.Width = Screen.Width
End With
End Sub

把form的BorderStyle设为0,ShowInTaskbar设为False。

其实我也很无聊!
2005-12-08 10:57
VB爱上我
Rank: 6Rank: 6
等 级:贵宾
威 望:25
帖 子:478
专家分:52
注 册:2005-10-14
收藏
得分:0 
如果要最大化的窗口里面有菜单的话,要最大化怎么搞.

IT618资讯网 提供服务端开发,前端开发,网页特效,热门开源系统研究,软件下载,站长建站,淘宝开店等学习资料.
2005-12-08 19:26
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
以下是引用VB爱上我在2005-12-8 19:26:00的发言:
如果要最大化的窗口里面有菜单的话,要最大化怎么搞.

一样可以最大化呀?不过菜单不会被隐藏。

2005-12-08 21:48
zmjls
Rank: 1
等 级:新手上路
帖 子:377
专家分:0
注 册:2005-9-30
收藏
得分:0 
可以把VisableOnTaskbar设成False,然后再用API函数把CRTL+ALT+DEL屏蔽掉,一切OK!
在设置FORM窗体的时候把borderstyle属性变为0,(注意哦:要在属性出口中设置,代码中设置无效哦)

对ASP、.NET、SQL情有独钟的情圣王子! 俺目标:睡觉睡到自然醒数钱数到手抽筋!
2005-12-09 08:25
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
收藏
得分:0 

楼主你说的任务栏是整条任务栏吧。

除了上面几位的共同建议,你还需要把窗口提升到其他窗口前面,需要用 API。

Option Explicit

Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Const HWND_TOPMOST = -1
Const SWP_NOSIZE = &H1
Const SWP_NOMOVE = &H2

Private Sub Form_Load()

Me.Move 0, 0, Screen.Width, Screen.Height '不能用 WindowState = vbMaximized,否则无法置前窗口
SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE

End Sub

2005-12-09 11:59
快速回复:[求助]谁知道怎么让窗体满屏显示?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.053715 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved