以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助，关于增加行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=49728)
--  作者：晕了快扶我
--  发布时间：2014/4/23 11:37:00
--  求助，关于增加行
For Each r As Row In Tables("窗口1_出库表")
    Dim temp As Integer = r("数量")/r("MOQ")
    Dim r1 As Row = Tables("窗口1_标签表").AddNew(Temp)
    r1("OPN") = r("OPN")
    r1("数量") = r("MOQ")
Next


数量/MOQ后得到一个整数，标签表中addnew这个整数行，应该如何写呢？
--  作者：晕了快扶我
--  发布时间：2014/4/23 11:38:00
--  
例子
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:标签测试1.foxdb
--  作者：Bin
--  发布时间：2014/4/23 11:42:00
--  
For Each r As Row In Tables("窗口1_出库表")
    Dim temp As Integer = r("数量")/r("MOQ")
    for i as integer = 1 to Temp 
    Dim r1 As Row = Tables("窗口1_标签表").AddNew()
    r1("OPN") = r("OPN")
    r1("数量") = r("MOQ")
    next
Next
--  作者：晕了快扶我
--  发布时间：2014/4/23 11:51:00
--  
TKS