以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]根据A列自动填写B列?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=126742)

--  作者:bashanren
--  发布时间:2018/10/27 22:49:00
--  [求助]根据A列自动填写B列?
各位大师晚上好!!
在“基础表”表中“河湖名称”列输入后,在“区级河长”列自动根据“数据库”中的“区级河长”列中提取数据并填写。谢谢各位老师了。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:清四乱.table


--  作者:y2287958
--  发布时间:2018/10/28 0:39:00
--  
DataColChanged事件
If e.DataCol.Name = "hehuMC"
    If e.DataRow.IsNull("hehuMC")
        e.DataRow("qjhzXM") = Nothing
    Else
        Dim dr As DataRow = DataTables("sjKU").Find("hehuMC=\'" & e.DataRow("hehuMC")& "\'")
        If dr IsNot Nothing
            e.DataRow("qjhzXM") = dr("qjhzXM")
        Else
            e.DataRow("qjhzXM") = Nothing
        End If
    End If
End If

--  作者:有点甜
--  发布时间:2018/10/29 9:15:00
--  

看看这里

 

http://www.foxtable.com/webhelp/scr/1453.htm