以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]动态设置窗体尺寸,  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=111090)

--  作者:2900819580
--  发布时间:2017/12/14 20:55:00
--  [求助]动态设置窗体尺寸,

e.Form.Height = e.Form.Controls("But同意").Top + e.Form.Controls("But同意").Height + 45
e.Form.Width = e.Form.Controls("TextBox1").Left +e.Form.Controls("TextBox1").Width +45

 

如上代码无法设置,,


--  作者:有点甜
--  发布时间:2017/12/14 23:40:00
--  

你这个窗口是什么窗口?独立、模式?停靠、共有?主窗口?

 

做个小例子发上来看看。


--  作者:2900819580
--  发布时间:2017/12/15 15:07:00
--  
模式,试过独立也不行
--  作者:有点甜
--  发布时间:2017/12/15 15:09:00
--  

1、这样写行不行?

 

e.Form.baseform.Height = 100
e.Form.baseform.Width = 200

 

2、这样写呢?

 

e.Form.baseform.Height = e.Form.Controls("But同意").Top + e.Form.Controls("But同意").Height + 45
e.Form.baseform.Width = e.Form.Controls("TextBox1").Left +e.Form.Controls("TextBox1").Width +45