Sub updateEditortView
Dim myContainer0 As ABMContainer = page.Component("section0a")
Dim myContainer2 As ABMContainer = myContainer0.Component("section0c")
myContainer2.Cell(4,1).RemoveAllComponents
Dim section0cEditor1 As ABMEditor
section0cEditor1.Initialize(page,"section0cEditor1",True,True,"EditorThemeSection1")
section0cEditor1.HideToolbar
section0cEditor1.SetEnabled(False)
myContainer2.Cell(4,1).AddComponent(section0cEditor1)
myContainer2.Cell(4,1).SetFixedHeight(750,True)
myContainer2.Refresh
section0cEditor1.Refresh
End Sub