Foxtable(狐表)用户栏目专家坐堂 → 二表间光标对应?


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

主题:二表间光标对应?

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


加好友 发短信
等级:一尾狐 帖子:422 积分:2708 威望:0 精华:0 注册:2012/2/10 18:12:00
二表间光标对应?  发帖心情 Post By:2014/7/29 22:47:00 [只看该作者]

二表间光标对应,在主表CurrentChanged设置
If e.Table.Current Is Nothing Then '如果Current为Nothing
    Return '则返回
End If
Dim wz1 As Integer
Dim dr1 As DataRow
dr1 = DataTables("资料扫描").Find("[身份证号] = '" & e.Table.Current("身份证号") & "'")
If dr1 IsNot Nothing Then
    wz1 = Tables("资料扫描").FindRow(dr1)
    If wz1 >= 0 Then
        Tables("资料扫描").Position = wz1
    End If
End If
现在的问题是"资料扫描"没加载,在后台,无法让光标相互对应,代码要怎么写?用sqlfind不行啊


 回到顶部
总数 60 1 2 3 4 5 6 下一页