嵌入式OLE的打印预览问题

找不到服务器

当窗体中的OLE控件用嵌入式方法嵌入WORD文件后，如何调出嵌入的WORD文件的打印预览窗体与打印功能？

Private Sub Command1_Click()

With OLE1
.CreateEmbed App.Path & "\Word.doc"
.DoVerb vbOLEPrimary
End With

End Sub

Private Sub Command2_Click()

打印预览代码：（？）

End Sub

[此贴子已经被作者于2006-10-13 17:47:08编辑过]

找不到服务器

程序版的贴给我删了，那就这面顶喽！

高人们指点呀！

[em09]