主题：[求助]根据条件找出了行，如何再判断这一行的另一列值为空

If dr IsNot Nothing and dr.isnull("还书日期") Then

dr("还书日期") = Date.Today

end if

    Dim dr As DataRow
    dr = DataTables("records").Find( "书刊条码='" & e.Form.Controls("还书书刊条码").Text & "' And 读者条码='" & e.Form.Controls("还书读者条码").Text & "'","借书日期 Desc")
If dr IsNot Nothing And dr.isnull("还书日期") Then 
    dr("还书日期")=Date.Now
    Tables("records").Current.Delete
    Tables("records").Save()
    MessageBox.show("书已登记归还,谢谢!")

end if
Else
    MainTable=Tables("records")
    Tables("records").Current.Reject()
    MessageBox.show("该书已还或借还书信息不匹配,请核实!")
End If