以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]跨表调用数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=91177)
--  作者：铜豌豆之首
--  发布时间：2016/10/1 14:47:00
--  [求助]跨表调用数据
重置和新增都没有反应
If e.DataCol.name ="姓名" Then
        If e.NewValue Is Nothing Then
            e.DataRow("组")=Nothing
        Else
            Dim nm As DataRow
            nm =DataTables("人事").find("姓名 =\' " & e.newvalue & "\'")
            If nm IsNot Nothing Then
                e.DataRow("组") = nm("组")
            End If
        End If
End If
--  作者：狐狸爸爸
--  发布时间：2016/10/2 8:31:00
--  
代码没有问题，先自己调试一下：
http://www.foxtable.com/webhelp/scr/1485.htm

搞不定就做个简单例子发上来。
--  作者：铜豌豆之首
--  发布时间：2016/10/2 12:01:00
--  
            Dim nm As DataRow
            nm =DataTables("人事").find("[姓名] =\' " & e.newvalue & "\'")
老师 经过我多次检查除发现：1、姓名没有用[]括起来 2、不能能申明nm作为变量名称（但是nm不能作为变量名称，感觉有点疑惑）
3、在检查代码过程中发现无法检查nm =DataTables("人事").find("[姓名] =\' " & e.newvalue & "\'")这种类型的，显示无法变为string类型，假如用命令窗口又有e参数这样是无法在里面执行的，老师有什么样的好办法检查对于筛选吗？
--  作者：狐狸爸爸
--  发布时间：2016/10/3 8:47:00
--  

你做个例子发上来看看，不应该有这样的问题的