昨晚看到hanxuntx的一个动态添加按钮的案例,但是不知道里面的意思,代码如下Dim ss() As String
Dim name As String = DataTables("按钮名称").GetComboListString("按钮名称",,"_Identify")
Dim i As Integer = 0
ss = name.Split("|")
For Each s As String In ss
Dim sb As WinForm.Button
Dim t As Integer
sb = e.Form.CreateControl(s,ControlTypeEnum.Button)
sb.Text = s
sb.Left = 20
sb.Top = i*20 + 20
i = i +2
e.Form.SetBounds(0,0,115,sb.Top + 40)
e.Form.AddControl(sb)
Next
请问如何实现按钮横向排列,还有能否讲解下各行代码的意思呢?还有如何将多个窗口的代码实现动态识别添加呢
[分享]动态添加按钮 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具! http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=13865&page=6