Foxtable(狐表)用户栏目专家坐堂 → [求助]自动输入


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

主题:[求助]自动输入

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


加好友 发短信
等级:三尾狐 帖子:636 积分:4062 威望:0 精华:0 注册:2016/10/19 16:45:00
[求助]自动输入  发帖心情 Post By:2017/2/23 11:41:00 [只看该作者]

老师,怎样在目录树表有空的行或空的单元格下同样还能自动输入。


If e.DataCol.Name = "一级明细" OrElse e.DataCol.Name = "二级明细" Then
    Dim dr As DataRow = e.DataRow
    Dim sr As DataRow 
    sr = DataTables("目录树").SQLFind("[目录类别] = '" & dr("一级明细") & "' And [目录名称] = '" & dr("二级明细") & "'") '在后台查找符合条件的行
    If sr IsNot Nothing Then '如果找到了符合条件的行
        dr("规格") = sr("规格型号")
        dr("单位") = sr("单位")
    Else
        dr("规格") = Nothing
        dr("单位") = Nothing
    End If
End If



 回到顶部