Foxtable(狐表)用户栏目专家坐堂 → [求助]共有类型的窗口如用代码设定大小?


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

主题:[求助]共有类型的窗口如用代码设定大小?

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110662 积分:563224 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/10/19 15:17:00 [显示全部帖子]

停靠区域为底的只能更改高度。

e.Form.height = 500

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110662 积分:563224 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/10/19 15:32:00 [显示全部帖子]

比如按钮

e.Form.height = 500
e.Form.panel.parent.height = 500

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110662 积分:563224 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/10/19 15:51:00 [显示全部帖子]

messagebox.show("调整前窗口高度为: " & e.Form.height)
dim h as integer = e.Form.height+ 500
e.Form.height =h
e.Form.panel.parent.height = h
messagebox.show("调整后窗口高度为: " & e.Form.height)

 回到顶部