Foxtable(狐表)用户栏目专家坐堂 → [求助]容器


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

主题:[求助]容器

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


加好友 发短信
等级:超级版主 帖子:110647 积分:563143 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/6 8:46:00 [显示全部帖子]

所谓的固定具体指什么?


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


加好友 发短信
等级:超级版主 帖子:110647 积分:563143 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/6 10:52:00 [显示全部帖子]

Dim t2 As WinForm.TextBox = Forms("窗口1").Controls("TextBox1")

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

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


加好友 发短信
等级:超级版主 帖子:110647 积分:563143 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/6 13:55:00 [显示全部帖子]

e.Form.Controls("Panel2").AddControl(Forms("窗口1").Controls("TextBox1"))
e.Form.Controls("Panel2").AddControl(Forms("窗口1").Controls("ComboBox1"))

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


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

Dim t2 As WinForm.TextBox = Forms("窗口1").Controls("TextBox1")
t2.Top = 10
t2.left = 10

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


加好友 发短信
等级:超级版主 帖子:110647 积分:563143 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/7 9:17:00 [显示全部帖子]

没看懂,截图说明

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


加好友 发短信
等级:超级版主 帖子:110647 积分:563143 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/7 9:35:00 [显示全部帖子]

把top和left设置为同一个值不就行了

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


加好友 发短信
等级:超级版主 帖子:110647 积分:563143 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/8 9:09:00 [显示全部帖子]

每个控件都设置好top和left不就行了?

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


加好友 发短信
等级:超级版主 帖子:110647 积分:563143 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/8 10:08:00 [显示全部帖子]

看8楼呀

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


加好友 发短信
等级:超级版主 帖子:110647 积分:563143 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/8 13:52:00 [显示全部帖子]

For i As Integer = 1 To 3
        Dim t2 As WinForm.TextBox = Forms("窗口1").Controls("TextBox" & i)
t2.Top = 10 + 40 * (i-1)
t2.left = 10
    Next
[此贴子已经被作者于2019/8/8 13:52:21编辑过]

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


加好友 发短信
等级:超级版主 帖子:110647 积分:563143 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/8/8 14:25:00 [显示全部帖子]

For i As Integer = 1 To 3
        Dim t2 As WinForm.Label = Forms("窗口3").Controls("Label" & i)
t2.Top = 10 + 40 * (i-1)
t2.left = 10
e.Form.Controls("Panel1").AddControl(t2)
    Next

 回到顶部
总数 23 1 2 3 下一页