以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助:如何将通过表A用代码求出的值输入到另一个表B  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=45788)

--  作者:一辈子只做一件事
--  发布时间:2014/2/11 10:10:00
--  求助:如何将通过表A用代码求出的值输入到另一个表B

Tables("表A").sort = "编号"
Dim v0 As Integer = 1
Dim i As Integer
For i = (i - 9) To Tables("表A").Rows.count - 1
    If i > Tables("表A").Rows.count - 10 Then
        If (Tables("表A").Rows(i - 1)("数量1") + Tables("表A").Rows(i)("数量1")) Mod 2 = 0 Then
            v0 = v0
        Else
            v0 = v0 +1
        End If
    End If
Next

 

 

我通过上面的代码求出了v0的值,现在的问题是:用什么代码来实现将v0的值输入到表B的[数量A]列,刚开始我太菜了,拜托老师了。。。


[此贴子已经被作者于2014-2-11 10:23:50编辑过]

--  作者:Bin
--  发布时间:2014/2/11 10:12:00
--  
求助什么? 有具体的问题,才有具体的答复.