Foxtable(狐表)用户栏目专家坐堂 → 获取表中某列的数据


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

主题:获取表中某列的数据

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


加好友 发短信
等级:一尾狐 帖子:465 积分:3216 威望:0 精华:0 注册:2017/4/18 1:15:00
获取表中某列的数据  发帖心情 Post By:2017/5/28 16:53:00 [只看该作者]

e.form.controls("Textbox2").Text = Tables("pos机库存资料").Current("客户姓名")
Dim dr As DataRow = DataTables("pos机库存资料").Find("机具条码='013610370586'")
If dr IsNot Nothing Then
  e.form.controls("Textbox2").Text = dr("客户姓名")
End If

 

麻烦看看这句代码对吗?怎么显示不了数据呢?

 

第一次对,第二次123456 第三次是空

[此贴子已经被作者于2017/5/28 17:28:30编辑过]

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/5/28 16:57:00 [只看该作者]

执行下面的代码,看弹出什么

 

e.form.controls("Textbox2").Text = Tables("pos机库存资料").Current("客户姓名")

msgbox(Tables("pos机库存资料").Current("客户姓名"))
Dim dr As DataRow = DataTables("pos机库存资料").Find("机具条码='013610370586'")
If dr IsNot Nothing Then

    msgbox(123456)

    msgbox(dr("客户姓名"))
    e.form.controls("Textbox2").Text = dr("客户姓名")
End If


 回到顶部