DesignerLoadException when using anonymus methods [VB]

Hey there,

i'm using SharpDevelop since this Monday and till now i had a great experience ^^.

Now i've found a bug (i guess at least (correct me otherwise)).

Following line ....

AddHandler fsWatcherUpload.Changed, Sub(s As Object, ea As FileSystemEventArgs) If ea.FullPath = input Then inputBansChanged = True

... leads to the following error in the designer Tab (col 88 is col 71 in the line above):

ICSharpCode.FormsDesigner.FormsDesignerLoadException: ICSharpCode.FormsDesigner.FormsDesignerLoadException: Syntax errors in F:\GAB2\GlobalArmaBanlist2\MainApp\frmMain.vb:
-- line 261 col 88: "(" expected

   at ICSharpCode.FormsDesigner.NRefactoryDesignerLoader.Parse()
   at System.ComponentModel.Design.Serialization.CodeDomDesignerLoader.EnsureDocument(IDesignerSerializationManager manager)
   at System.ComponentModel.Design.Serialization.CodeDomDesignerLoader.PerformLoad(IDesignerSerializationManager manager)
   at System.ComponentModel.Design.Serialization.BasicDesignerLoader.BeginLoad(IDesignerLoaderHost host)

   at ICSharpCode.FormsDesigner.FormsDesignerViewContent.LoadDesigner()
   at ICSharpCode.FormsDesigner.FormsDesignerViewContent.LoadAndDisplayDesigner()
   at ICSharpCode.FormsDesigner.FormsDesignerViewContent.LoadInternal(OpenedFile file, Stream stream)
   at ICSharpCode.SharpDevelop.Gui.AbstractViewContentHandlingLoadErrors.Load(OpenedFile file, Stream stream)

But when using following lines ....

AddHandler fsWatcherUpload.Changed, Sub(s As Object, ea As FileSystemEventArgs)
                                                                        If ea.FullPath = input Then inputBansChanged = True
                                                                  End Sub

... works perfectly fine.

Hope you can tell me why/use the infos.