怎么实现凭证号和时间符合条件的行 将uuid全部赋值为一样 凭证编号从01开始编号 谢谢老师当前代码
Dim Products As List(Of String)
Products = DataTables("凭证明细").GetValues("时间")
Dim Products1 As List(Of String)
For Each Product As String In Products
Products1 = DataTables("凭证明细").GetValues("凭证号","时间='"& Product &"'")
For Each Product1 As String In Products1
Dim a1 As DataRow=DataTables("凭证明细").Find("时间='" & Product & "'and 凭证号='" & Product1 & "'")
Dim a2 As DataRow=DataTables("凭证号").Find("时间='" & Product & "'and 凭证号='" & Product1 & "'")
If a1 IsNot Nothing Then
a1("uuid")=a2("uuid")
End If
Next
Next
当前代码运行如下：
加好友 
发短信
Post By：2021/12/6 17:55:00 [只看该作者]
