如何 禁用或禁止显示OLE 的菜单栏

Bugs1984 2004-07-16 12:28:22
我在 OLE控件里面插入一个Word 文档,当程序运行时在 OLE控件 里面显示文档内容。但是这时VB就会自动显示 Word的菜单栏。

请问如何 不让菜单显示?或者禁用OLE控件的菜单??
...全文
259 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
libraleen 2004-07-24
  • 打赏
  • 举报
回复
sorry
是MSDN
libraleen 2004-07-24
  • 打赏
  • 举报
回复
另外,adSaveCreateOverWrite和adSaveCreateNotExist 是什么意思,DSDN上怎么查不到?
libraleen 2004-07-24
  • 打赏
  • 举报
回复
to online:
以前看过你的一个帖子,其中关于读取数据的内容:
'从数据库中读取数据,保存成文件
Sub s_ReadFile()
Dim iStm As ADODB.Stream
Dim iRe As ADODB.Recordset
Dim iConc As String

'数据库连接字符串
iConc = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False" & _
";Data Source=\\xz\c$\Inetpub\zj\zj\zj.mdb"

'打开表
Set iRe = New ADODB.Recordset
iRe.Open "tb_img", iConc, adOpenKeyset, adLockReadOnly
iRe.Filter = "id=64"

'保存到文件
Set iStm = New ADODB.Stream
With iStm
.Mode = adModeReadWrite
.Type = adTypeBinary
.Open
.Write iRe("img")
.SaveToFile "c:\test.doc" !!!!!!!!!!在这里提示写入文件失败
End With

'关闭对象
iRe.Close
iStm.Close
End Sub
能解决一下吗?
jiang8360 2004-07-20
  • 打赏
  • 举报
回复
等一下,我也来一下
jiang8360 2004-07-19
  • 打赏
  • 举报
回复
up
dongge2000 2004-07-19
  • 打赏
  • 举报
回复
结贴吧!
online 2004-07-16
  • 打赏
  • 举报
回复
OLE1.SourceDoc = "c:\\com.doc"
OLE1.Action = 1 'use the old action method
OLE1.SizeMode = vbOLESizeAuttoSize '调节对象大小使其正好充满OLE容器控件

试试,我的怎么没有显示

1,451

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧