Foxtable(狐表)用户栏目专家坐堂 → 求助 动态生成控件及动态绑动例


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

主题:求助 动态生成控件及动态绑动例

帅哥哟,离线,有人找我吗?
rjh4078
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3361 积分:24808 威望:0 精华:0 注册:2012/3/26 21:47:00
  发帖心情 Post By:2017/4/16 20:03:00 [显示全部帖子]

For  i As Integer=0 To Tables("qrymyf").rows.count-1
    Dim txt As WinForm.TextBox
    txt = e.Form.CreateControl("TextBox" & i, ControlTypeEnum.TextBox)
    txt.value = Tables("表a").rows(i)("ffikgn")
    txt.Left = 100
    txt.Top = 50*i + 100
    e.Form.AddControl(txt)
Next

 回到顶部