Foxtable(狐表)用户栏目专家坐堂 → [求助]根据A列自动填写B列?


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

主题:[求助]根据A列自动填写B列?

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


加好友 发短信
等级:狐神 帖子:4773 积分:34673 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By: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

 回到顶部