Hallo zusammen
Kann jemand folgenden Fehler bestätigen?
Ich habe folgende Beispielklasse:
Class ExampleClass
Sub New(ObjName As String)
Print "Example: " & ObjName
End Sub
Public Function Add(ObjName As String) As ExampleClass
Set Add=New ExampleClass(ObjName)
End Function
End Class
Diese will ich in einem Agenten aufrufen (Eclipse Editor):
Dim oExampleClass As New ExampleClass("Test1")
With oExampleClass.Add("Test2")
End With
Sobald ich nun im With Block einen weiteren einfügen will hängt Client sich auf sobald ich den Punkt tippe.
With oExampleClass.Add("Test2")
With .
End With
Dann kommt Sanduhr und Client hängt.
PS: Man könnte sagen so nagelt man den Eclipse Editor an die Wand.
Gruss
Remo