How open some bitmaps in one CPP?

I want open some bitmaps in one appwindow. If I use:

Set app = CreateObject("CorelPHOTOPAINT.Application")
Set doc1 = app.OpenDocument(File1Path)
Set doc2 = app.OpenDocument(File2Path)
.......................................

... it opened in one appwindow, but in MenuBar on top not show: Image, Adjust, Effects, Mask, Object, Movie, Web. It's terrible!

Else:

Shell """" & appPath & """ """ & File1Path & """", vbMinimizedNoFocus
.......................................

... it opened normal, but in divers appwindows. HELP!!!!!!!