Foxtable(狐表)用户栏目专家坐堂 → 求label读指定表数据当前行指定列数据代码


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

主题:求label读指定表数据当前行指定列数据代码

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


加好友 发短信
等级:超级版主 帖子:109474 积分:557032 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/2/6 11:31:00 [显示全部帖子]

e.form.controls("label1").text = tables("表A").current("某某列")

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


加好友 发短信
等级:超级版主 帖子:109474 积分:557032 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/2/6 11:48:00 [显示全部帖子]

dim r as row = Tables("表A").current
if r isnot nothing then
e.form.controls("label1").text = r("第一列") & r("第二列")
end if

或者

dim r as row = Tables("表A").current
if r isnot nothing then
dim ss as string
for each s as string in {"第一列","第二列","第n列",...............}
ss = ss &  r(s) 
next
e.form.controls("label1").text = ss
end if

 回到顶部