1,216
社区成员
发帖
与我相关
我的任务
分享在ＶＢ中向Word中添加一按钮，这个按钮可不可以执行我想要的操作
我在VＢ中调用Word时，通过下面的语句向word的工具栏中添加了１个按钮，名为＂保存＂
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Set oBars = wdWord.CommandBars
Set oNewBar = oBars.Add("保存", , , Temporary:=True)
oNewBar.Visible = True
Set oNewButton1 = oNewBar.Controls.Add(msoControlButton)
oNewButton1.Style = msoButtonIconAndCaption
oNewButton1.Caption = "保存"
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
请问可不可以对这个新添加的＂保存＂按钮写上代码让他执行我想要的操作．例如执行
把当前操作的这个文档存到数据库中．
如果可以的话，应该在哪儿写呢．
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Set oBars = wdWord.CommandBars
Set oNewBar = oBars.Add("保存", , , Temporary:=True)
oNewBar.Visible = True
Set oNewButton1 = oNewBar.Controls.Add(msoControlButton)
oNewButton1.Style = msoButtonIconAndCaption
oNewButton1.Caption = "保存"
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
请问可不可以对这个新添加的＂保存＂按钮写上代码让他执行我想要的操作．例如执行
把当前操作的这个文档存到数据库中．
如果可以的话，应该在哪儿写呢．
...全文
请发表友善的回复…
发表回复
northwolves 2005-12-08
- 打赏
- 举报
可以参考李洪根的代码:
http://dev.csdn.net/develop/article/20/20406.shtm
http://dev.csdn.net/develop/article/20/20406.shtm
weiweiplay 2005-12-08
- 打赏
- 举报
帮顶
seven2015 2005-12-08
- 打赏
- 举报
不清楚
