
加好友 发短信
等级:贵宾
帖子:35433
积分:178530
威望:0
精华:3
注册:2013/3/30 16:36:00
|
Post By:2013/10/28 8:22:00 [显示全部帖子]
For i As Integer = Tables("发货单号1").TopPosition To Tables("发货单号1").BottomPosition Dim dr As DataRow = Tables("发货单号1").Rows(i).DataRow Dim crs As List(of DataRow) = dr.GetChildRows("公斤数录入1")
整段代码唯一的一个循环,还用问啊.
判断一下dr("接收单")="EMS" 即可
|
|