主题：判断条件问题

num=DataTables("批量付款TEMP").Compute("count([合同号])","[合同号]='" & c & "'")
Dim num2 As Integer = DataTables("批量付款TEMP").GetValues("凭证号","[合同号]='" & c & "'").count

If num>num2 Then
    dr("校验") =dr("校验") & "采购订单号与上面有重复!" 
End If