sub dockablewindow()
dim ouserinterfacemgr as userinterfacemanager
set ouserinterfacemgr = thisapplication.userinterfacemanager
' create a new dockable window
dim owindow as dockablewindow
set owindow = ouserinterfacemgr.dockablewindows.add("sampleclientid", "testwindowinternalname", "test window")
' get the hwnd of the dialog to be added as a child
' change this value!
dim hwnd as long
hwnd = 4851096
' add the dialog as a child to the dockable window
call owindow.addchild(hwnd)
' don't allow docking to top and bottom
owindow.disableddockingstates = kdocktop + kdockbottom
' make the window visible
owindow.visible = true
end sub
forums.autodesk.com