以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]面板加入面板 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=123281) |
-- 作者:blsu33 -- 发布时间:2018/8/11 9:40:00 -- [求助]面板加入面板 老师, 如何将面板按照指定的尺寸,按照指定的行数列数加入面板中?
|
-- 作者:有点蓝 -- 发布时间:2018/8/11 9:57:00 -- 如果新增的panel尺寸是变化的,没有办法计算行列 |
-- 作者:blsu33 -- 发布时间:2018/8/11 9:58:00 -- 固定 怎么写 |
-- 作者:有点蓝 -- 发布时间:2018/8/11 10:08:00 -- 细节自己调整 Dim txt As WinForm.Panel txt = e.Form.CreateControl("Panel1", ControlTypeEnum.Panel) Dim t1 As WinForm.TextBox = e.Form.Controls("TextBox1") Dim t2 As WinForm.TextBox = e.Form.Controls("TextBox2") txt.Left = val(t2.Text) * (35+80) + 35 txt.Top = val(t1.Text) * (35+80) + 35 txt.Width = 80 txt.height = 80 txt.BackColor = Color.blue e.Form.Controls("Panel1").AddControl(txt) |