以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]容器  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=139103)

--  作者:江南小镇
--  发布时间:2019/8/6 8:11:00
--  [求助]容器
老师好,怎样把多个控件用代码固定在Panel1容器中。
--  作者:有点蓝
--  发布时间:2019/8/6 8:46:00
--  
所谓的固定具体指什么?


--  作者:江南小镇
--  发布时间:2019/8/6 10:41:00
--  
老师,我的意思是用代码把按钮1、文本框1、组合框1摆在Panel1,把按钮2、文本框2、组合框2摆在Panel2。
--  作者:有点蓝
--  发布时间:2019/8/6 10:52:00
--  
Dim t2 As WinForm.TextBox = Forms("窗口1").Controls("TextBox1")

e.Form.Controls("SplitContainer1").Panel2.AddControl(t2)

--  作者:江南小镇
--  发布时间:2019/8/6 12:05:00
--  
老师,我要把标出的也摆在这个面板里。

Dim t2 As WinForm.TextBox = Forms("窗口1").Controls("TextBox1")
\'.ComboBox = Forms("窗口1").Controls("ComboBox1")
e.Form.Controls("Panel2").AddControl(t2)

--  作者:有点蓝
--  发布时间:2019/8/6 13:55:00
--  
e.Form.Controls("Panel2").AddControl(Forms("窗口1").Controls("TextBox1"))
e.Form.Controls("Panel2").AddControl(Forms("窗口1").Controls("ComboBox1"))

--  作者:江南小镇
--  发布时间:2019/8/6 15:03:00
--  
老师,面板内的控件能指定上左或上右位置吗
--  作者:有点蓝
--  发布时间:2019/8/6 15:10:00
--  
Dim t2 As WinForm.TextBox = Forms("窗口1").Controls("TextBox1")
t2.Top = 10
t2.left = 10

--  作者:江南小镇
--  发布时间:2019/8/7 8:18:00
--  
老师,怎样把四个同等大小的面板框停靠在窗口的相同位置。
--  作者:有点蓝
--  发布时间:2019/8/7 9:17:00
--  
没看懂,截图说明