Nothing的使用,急等。
以下一段程序:
Dim xlsApp As Excel.Application
Dim xlsBook As Excel.Workbook
Dim xlsSheet As Excel.Worksheet
Dim rng1 As Excel.Range
Set xlsApp = New Excel.Application
Set xlsBook = xlsApp.Workbooks.Open("test.xls")
Set xlsSheetTemp = xlsBookTemp.Sheets(1)
Set rng1 = xlsSheet.Cells.Find(What:="VB编程技巧", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False)
现在我想判断是返回了Range对象,还是Nothing对象,该怎么判断?