If jo IsNot Nothing Then
If jo("result_code").ToString() = "SUCCESS" Then
Dim joo As JObject = jo("data")
If joo("payer_uid") IsNot Nothing Then
MessageBox.Show("这是完成的订单")
Else
MessageBox.Show("未支付,并且没有超时")
'End If
End If
ElseIf jo("result_code").ToString() = "FAIL" Then
MessageBox.Show("这是超时的订单")
为什么不是空值的和是空值的都显示,这是完成的订单