Foxtable(狐表)用户栏目专家坐堂 → [求助] 条件删除单元格内容


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

主题:[求助] 条件删除单元格内容

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


加好友 发短信
等级:五尾狐 帖子:1029 积分:6497 威望:0 精华:0 注册:2014/1/3 12:49:00
[求助] 条件删除单元格内容  发帖心情 Post By:2014/9/28 15:47:00 [只看该作者]

如果我的按钮是在  “机房板件端口表” 中;想实现删除 “机房板盘端子台帐表” 中符号 “机房板件端口表” 中所点击的当前行 条件的“业务名称”单元格内容 。 

如下的命令该怎么改?(这样写的话好像是“机房板盘端子台帐表”为当前行为符号条件的行才能给被删除)

For Each r As Row In Tables("机房板件端口表").Rows
    Dim dr As DataRow = DataTables("机房板盘端子台帐表").Find("机柜编号 = '" & r("机柜编号1") & "' and  板盘端子名称 = '" & r("板盘端子名称1") & "' ")
    If dr IsNot Nothing Then
        
        Tables("机房板盘端子台帐表").Current("业务名称") = Nothing      
    End If
Next

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/9/28 15:54:00 [只看该作者]

看不懂你的描述

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/9/28 15:57:00 [只看该作者]

Dim r As Row = Tables("机房板件端口表").current
Dim dr As DataRow = DataTables("机房板盘端子台帐表").Find("机柜编号 = '" & r("机柜编号1") & "' and  板盘端子名称 = '" & r("板盘端子名称1") & "' ")
If dr IsNot Nothing Then
    dr("业务名称") = Nothing
End If

 


 回到顶部
帅哥哟,离线,有人找我吗?
wumingrong1
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1029 积分:6497 威望:0 精华:0 注册:2014/1/3 12:49:00
  发帖心情 Post By:2014/9/28 15:59:00 [只看该作者]

查找 “机房板盘端子台帐表” 中与 当前表“机房板件端口表”当前行 的 ‘机柜编号’和‘板盘端子名称’相同的行;如果有符号条件的行、那么,将“机房板盘端子台帐表”中符号条件行的“业务名称”单元格内容删除掉


For Each r As Row In Tables("机房板件端口表").Rows
    Dim dr As DataRow = DataTables("机房板盘端子台帐表").Find("机柜编号 = '" & r("机柜编号") & "' and  板盘端子名称 = '" & r("板盘端子名称") & "' ")
    If dr IsNot Nothing Then
        
        Tables("机房板盘端子台帐表").Current("业务名称") = Nothing      
    End If
Next

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/9/28 16:01:00 [只看该作者]

看3楼


 回到顶部