主题：如何实现新增行在第一行位置

在存货档案中增加一个窗口，想点击下存货档案按钮，系统能自动将“存货档案”里的期初数量、产品填充到“存货账”新增第一行所对应入库和产品列下，而现在功能是一直在“存货账”的最后一行增加这些记录，请教大师们这代码应如何编写，谢谢。

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

点击浏览该文件:流水账.rar

财务上默认规矩是把期初数都在存货账（例）最上面位置，我想把这些期初数都放在最上面位置，一直试不来请大师指教，谢谢。

里面代码确是可以把“存货档案”的数据，一股脑的复制到“存货账”里，但都是在最下面增加行，无法移到最上面，现在我想也是把这些数据在增加就加在“存货账”最上面。

已解决，把存货档案窗口程序代码稍改下即可。

For Each dr As DataRow In DataTables("存货档案").Select("期初数量 Is Not Null")

    If dr("产品") IsNot Nothing

        Dim dr1 As Row = Tables("存货账").Insertnew()

        dr1("产品") = dr("产品")

        dr1("入库") = dr("期初数量")

    End If

Next