iOS Question This Sub Can't be compiled

Sub SetLastModified(Dir As String, FileName As String, DT As Long) As Boolean
   Dim no As NativeObject = Me
   Dim c As NativeObject
   c = c.Initialize("B4ICommon").RunMethod("shared", Null).RunMethod("DateTime", Null)
   Return no.RunMethod("setlastmodifiedtime::", Array(File.Combine(Dir, FileName), c.RunMethod("TicksToNSDate:", Array(DT)))).AsBoolean
End Sub

#if objc
- (BOOL)setlastmodifiedtime:(NSString*) target :(NSDate*) dt {
  NSDictionary *attr = [NSDictionary dictionaryWithObjectsAndKeys: dt, NSFileModificationDate, NULL];
  return [[NSFileManager defaultManager] setAttributes: attr ofItemAtPath: target error: NULL];
}
#end if

'Code module
#Region  Project Attributes 
    #ApplicationLabel: B4i Example
    #Version: 1.0.0 
    'Orientation possible values: Portrait, LandscapeLeft, LandscapeRight and PortraitUpsideDown
    #iPhoneOrientations: Portrait, LandscapeLeft, LandscapeRight
    #iPadOrientations: Portrait, LandscapeLeft, LandscapeRight, PortraitUpsideDown
    #Target: iPhone, iPad
    #MinVersion: 7
#End Region

Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'Public variables can be accessed from all modules.
    Public App As Application
    Public NavControl As NavigationController
    Private Page1 As Page

End Sub

Private Sub Application_Start (Nav As NavigationController)
    NavControl = Nav
    Page1.Initialize("Page1")
    Page1.Title = "Page 1"
    Page1.RootPanel.Color = Colors.White
    NavControl.ShowPage(Page1)
End Sub

Private Sub Page1_Resize(Width As Int, Height As Int)
   
    Dim n As String
    Dim o As OutputStream
    Dim b(1024) As Byte
   
    n = "test"
    o = File.OpenOutput(File.DirTemp, n, False)
   
    o.WriteBytes(b, 0, b.Length)
    o.Close
   
    icSetLastModified(File.DirTemp, n, DateTime.DateParse("02/23/2007"))
   
    Msgbox(DateTime.Date(File.LastModified(File.DirTemp, n)), "")

End Sub

Sub icSetLastModified(Dir As String, FileName As String, DT As Long) As Boolean

    Dim no As NativeObject = Me
   
    Return no.RunMethod("setlastmodifiedtime::", Array(File.Combine(Dir, FileName), DT)).AsBoolean
   
End Sub

#if objc
- (BOOL)setlastmodifiedtime: (NSString*) target :(long long) dt {
  NSDictionary *attr = [NSDictionary dictionaryWithObjectsAndKeys: @(dt), NSFileModificationDate, NULL];
  return [[NSFileManager defaultManager] setAttributes: attr ofItemAtPath: target error: NULL];
}
#end if

#if objc
- (BOOL)setlastmodifiedtime: (NSString*) target :(long long) dt {
  NSDictionary *attr = [NSDictionary dictionaryWithObjectsAndKeys: [NSNumber numberWithLongLong:dt], NSFileModificationDate, NULL];
  return [[NSFileManager defaultManager] setAttributes: attr ofItemAtPath: target error: NULL];
}
#end if