While in Ted.vb you can use this syntax:

Dim editDialog As EditObjDialog = New EditObjDialog(Main.Window)

in Article.vb you have to call it differently:

Dim editDialog As EditObjDialog = New EditObjDialog(TedApp.AppBase.Windows.Item(0))