主题：求助,指定要增加的行数

搞了半天没搞定

在窗口用按钮控制，用“出库单”数量/MOQ得到在标签表要添加的行数，并且标签表的数量等于出库单的MOQ，OPN = OPN

例子

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:标签测试.foxdb

上传的时候忘记改了，不要点按钮，否则会死机，我测试DO..LOOP没改过来

此主题相关图片如下：qq图片20130523142722.jpg

For Each r As Row In Tables("窗口1_出库表")
    Dim temp As Integer = r("数量")/r("MOQ")
    Dim r1 As DataRow = DataTables("标签表").AddNew(Temp)
    r1("OPN") = r("OPN")
    r1("数量") = r("MOQ")
Next

出库表中的每一行，我都进行计算，计算出temp的值，这个值作为标签表的添加行数

比如 A 料，有100 ，MOQ是10 那么在标签表里增加100/10 =10行 OPN为A，数量为10

Dim r1 As DataRow = DataTables("标签表").AddNew(Temp)
我现在只能增加到1行有数据的，其他9行都是空行

TKS...