Foxtable(狐表) → 用户栏目 → 专家坐堂 → 代码报错


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

主题：代码报错
帅哥哟，离线，有人找我吗？
zchlln
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：118 积分：1161 威望：0 精华：0 注册：2013/9/9 14:34:00 		代码报错  发帖心情 Post By：2016/3/2 15:22:00 [显示全部帖子]

For i1 As Integer = 0 To Tables("设备库存明细").Rows.Count - 1
    For i2 As Integer = 0 To Tables("续费表").Rows.Count - 1

        If  Tables("续费表").Rows(i2)("备注 = '到期未续费不在免费更换周期内,日后更换算新装' ") 
            Tables("续费表").Rows(i2)("设备ID号") = Tables("设备库存明细").Rows(i1)("设备ID号") Then
            Tables("续费表").Rows(i2)("备注")  = Tables("设备库存明细").Rows(i1)("备注")
        Else
            Continue For
        End If
    Next
Next

备注符合条件 且 设备ID号 设备库存明细中有的 同步备注信息
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04639 秒, 5 次数据查询