[求助]怎么实现帮助

gzy

尹凡还在坐火车，所以来发帖了！


我的菜单中有个帮助选项，如何实现点击以后就弹出一个CHM格式的帮助文件？


        用shell吗？好象不行。

mccad

怎么不去看AutoCAD提供的acad.mnu文件中是怎么写的？

1. ID_DevHelp         [开发人员帮助(&V)]^C^C^P(help "acad_dev" "") ^P

复制代码

gzy

还是不怎么清楚。我的菜单都是在VBA中创建的，其中包含了帮助项目，按照上面的方法怎么知道我自己这个帮助的ID呢？另外我这个帮助CHM的路径如果随DVB放在一个随便的目录怎么办？


        如何用VBA的一个过程实现呢？

gzy

搞定了，顺便把方法也贴出来方便大家浏览：

2. Sub help()   'Shell "hh.exe E:\帮助\示例\help.chm"
3.    
4.        Dim FileName As String
5.        FileName = Application.VBE.ActiveVBProject.FileName
6.        Dim PathName As String
7.        PathName = Left(FileName, Len(FileName) - 11)
8.        Shell "hh.exe " & PathName & "help.chm"
9.       
10. End Sub

Sub help()   'Shell "hh.exe E:\帮助\示例\help.chm"            Dim FileName As String        FileName = Application.VBE.ActiveVBProject.FileName        Dim PathName As String        PathName = Left(FileName, Len(FileName) - 11)        Shell "hh.exe " & PathName & "help.chm"        End Sub

多谢老大，多谢尹凡！