Foxtable(狐表)用户栏目专家坐堂 → 动态增加控件


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

主题:动态增加控件

美女呀,离线,留言给我吧!
tujiu
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:120 积分:1100 威望:0 精华:0 注册:2014/7/17 9:46:00
动态增加控件  发帖心情 Post By:2014/8/8 14:54:00 [只看该作者]

在窗口中动态增加6个label控件,这6个控件是通过数组和for each组合使用添加的。现在想让这6个控件分开显示,分成2行,每行3个,并每列都是对齐。这个怎么设置?用集合的方式能实现吗?

[此贴子已经被作者于2014-8-8 14:54:24编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/8 14:59:00 [只看该作者]

Dim lbls() As String = {"1", "2", "3", "4", "5", "6"}

For i As Integer = 0 To 1
    For j As Integer = 0 To 2
        Dim lbl As WinForm.Label
        lbl = e.Form.CreateControl("lable1", ControlTypeEnum.Label)
        lbl.Text = "标签" & lbls(i*3+j)
        lbl.Left = 100 * j
        lbl.Top = 100 * i
        e.Form.AddControl(lbl)
    Next
Next


 回到顶部