Variable Not Defined

In the on clkick event I have code that is not running.

... Dim strCurrentYear As String
Dim intCurrentYear As Integer
Dim dtLastYear As Date
Dim intLastYear As Integer
Dim strLastYear As String
Dim strSubCycle As String
'Add dtThisYear to account for the changing year
Dim dtThisYear As Date
Dim db As Database
Dim rst As Recordset


'Get the Cycle Number and the Subcycle
strCycleNum = Forms!frmreports.[lstNetChk].Value
strSubCycle = Forms!frmreports.[NetChkSubCycle].Value
strSubCycle = "'" & strSubCycle & "'"


Set db = CurrentDb
'Get the year
strSQL = "SELECT Max([OCSE Cycle Raw Data].YEAR) as MaxOfYear " & _
"FROM [OCSE Cycle Raw Data] " & _
"WHERE (([OCSE Cycle Raw Data].[OCSE CYCLE])=" & strCycleNum & ") " & _
"AND (([OCSE Cycle Raw Data].SUBCYCLE)=" & strSubCycle & ");"

Set rst = db.OpenRecordset(strSQL)

intCurrentYear = rst(MaxOfYear) ....

Access for some reason doesn't understand MaxOfYear. Although when I run the query by hand it comes out to 2005. What am I doing wrong here?