在VB程序设计时，在OLE容器控件中插入了Microsoft Office Word 文档对象，但在运行时，只能激活有数据的文档，没有数据的却不能激活Word程序。应该怎么办？

终于找到方法了

其实在VB程序设计时，不用在OLE容器控件中插入Microsoft Office Word 文档对象。可以在运行时插入。

下面的代码供参考：
Private Sub cmdjh_Click()    '新增图片
    If MsgBox("新增图片将会丢失原有数据！" + Chr(13) + Chr(10) + "如果在原有数据基础上增加数据请选择“否”，然后双击OLE控件。" + Chr(13) + Chr(10) + "选择“是”，继续；" + Chr(13) + Chr(10) + "选择“否”，放弃操作。", vbYesNo + vbQuestion, "系统询问") = vbYes Then
       OLE1.CreateEmbed "", "Word.Document"
       OLE1.DoVerb -5  '激活
    Else
       Exit Sub
    End If
End Sub

OLE1.CreateEmbed "", "Word.Document"
这段代码用于动态创建空的Word文档

原来的代码写的过于复杂，运行时总出错。结果却这么简单。把简单的问题复杂化了。

不过现在还有一个问题：就是激活空的Word文档后，不能自动显示光标位置，要手工插入光标。换句话说就是好象激活的空的Word文档不能自动获得焦点，希望能找到方法解决。
各位如果有好的方法请赐教。

二进制流操作就可以