Foxtable(狐表)用户栏目专家坐堂 → [求助]动态增加控件,动态绑定行问题


  共有2410人关注过本帖平板打印复制链接

主题:[求助]动态增加控件,动态绑定行问题

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


加好友 发短信
等级:幼狐 帖子:85 积分:722 威望:0 精华:0 注册:2018/5/2 16:58:00
[求助]动态增加控件,动态绑定行问题  发帖心情 Post By:2023/5/10 16:38:00 [只看该作者]

有如下表:
图片点击可在新窗口打开查看
新建一个窗口,增加一个按钮控件,按钮代码如下
Dim x As Integer = 0
Dim y As Integer = 0
For i As Integer = 0 To 3 '列出全部
    If i Mod 2 = 0 Then
        y += 30
        x = 0
    Else
        x += 160
    End If
    Dim lbl As WinForm.label
    lbl = e.Form.CreateControl("label" & i, ControlTypeEnum.label)
    lbl.text = Tables("表A").Cols(i).Caption
    lbl.Left = 10 + x
    lbl.Top = 10 + y
    lbl.Width = "600"
    lbl.Height = "260"
    e.Form.AddControl(lbl)
Next
输出如图
图片点击可在新窗口打开查看
现在想要实现如下效果
图片点击可在新窗口打开查看
在鼠标单击不同行时,显示当前行的人员信息,单个增加控件可以实现这种效果,但是想用动态增加控件的方式,不知道能不能实现,自己试没成功,求实现效果的代码


 回到顶部
总数 17 1 2 下一页