Dim rows As DataRow() = datatable.Select("客户='" & custom & "' and 持卡人身份证号码='" & taskrow("持卡人身份证号码").ToString & "'") s= rows(0)(1).ToString