Foxtable(狐表)用户栏目专家坐堂 → 窗体全屏显示


  共有2137人关注过本帖树形打印复制链接

主题:窗体全屏显示

帅哥哟,离线,有人找我吗?
peibaomin
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:465 积分:3216 威望:0 精华:0 注册:2017/4/18 1:15:00
窗体全屏显示  发帖心情 Post By:2017/7/4 11:21:00 [只看该作者]

窗体加载后怎么设置我全屏显示?


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/4 11:56:00 [只看该作者]

方法一:窗口设置最大化,如

 

forms("窗口1").baseform.windowstate = 2

 

方法二:动态设置窗口大小

 

Dim frm = forms("窗口1").baseform
frm.windowstate = 0
frm.left = 0
frm.top = 0
frm.width = SysInfo.ScreenWidth
frm.height = SysInfo.ScreenHeight
frm.topmost = True


 回到顶部
帅哥哟,离线,有人找我吗?
忽友狐悠
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:41 积分:360 威望:0 精华:0 注册:2017/3/13 22:26:00
  发帖心情 Post By:2017/7/26 9:26:00 [只看该作者]

好的,我试一下。

 回到顶部