主题：下列语句不能完全执行，请赐教

Select Case e.DataCol.Name    

     Case "借阅日期", "归还日期" 

        If e.DataRow.IsNull("借阅日期")  Then '借阅日期是否为空

           e.DataRow("借阅状态") = "在馆" '如果为空,则借阅状态显示在馆

        Else

            If e.DataRow.IsNull("归还日期") Then '归还日期是否为空

               e.DataRow("借阅状态") = "借出" '如果为空,则借阅状态显示借出

            Else

               e.DataRow("借阅状态") = "在馆" '如果不为空,则借阅状态显示在馆

            End If

        End If    

End Select