请教：怎样在用VBA所编的程序中引用chm帮助文件
本帖最后由 作者 于 2009-3-19 17:52:01 编辑 <br /><br /> <p>用autolisp和DCL编写的程序可以引用CHM帮助文件。</p><p>不知道在VBA编写的程序中如何引用CHM帮助文件。</p><p>VB6．0的app.filepath在这里无法使用。</p> <p>没有人回答啊。</p><p>是不是这个问题太简单了吧。</p><p>我自己找吧。有没有人也想知道呢。</p> <p>用shell "hh.exe " "路径\帮助文件.chm"</p><p>可以打开。但不知怎样用这种方法使用上下文ID号。</p><p>在VBA里如何使用 sendkeys "{F1}"，来调用帮助文件。</p><p>sendkeys"{F1}",这种办法可以用上下文ID号。</p><p>请高手帮助解决。多谢了。</p> <p>下面是使用commondialog控件的一段程序：</p><p>Private Sub Command2_Click()<br/> With CommonDialog1<br/> .HelpFile = App.Path & "\MakeCHM.chm"<br/> '进入“Help“文件的 Click Event 标题。<br/> '“.chm”文件的数字值是由“.HPJ”文件<br/> '的部分决定的。只有当你用<br/> '“Microsoft Help Workshop“建立<br/> '自己的帮助文件时，<br/> '才可以编辑此数字值。<br/> .HelpContext = 200<br/> .HelpCommand = cdlHelpContext<br/> .ShowHelp<br/> End With<br/>End Sub</p><p>但发现对CHM文件不起作用。只对HLP文件有效果。这是大多数教材、有关这方面书籍及VB6．0的MSDN帮助中介绍的方法。不知道什么原因，不能运行。</p><p>VB6．0、AutoCad VBA不是不支持调用有上下文ID的帮助文件。在AutoCad VBA中使用inputbox可以证明这一点：</p><p>Private Sub CommandHelp_Click()<br/> InputBox "按下帮助按钮打开相关主题帮助文件", , , , , Left(Application.Preferences.Files.TemplateDwgPath, 1) & ":\equipment\help\bdqpmt.chm", 2000<br/></p> <p></p><p> </p><p></p><p> </p> 按上面的做法是个很笨办法。需要多打开一对话框。但能够达到了目的，总比没有强一点。 <p>另外msgbox好像也有打开有上下文ID帮助文件的功能。但实际不能运行。看到这里，可以试一下，就会证明不行。</p><p> MsgBox "按下帮助按钮打开相关主题帮助文件",,, Left(Application.Preferences.Files.TemplateDwgPath, 1) & ":\equipment\help\bdqpmt.chm", 2000<br/></p><p>实际打开的对话框中，没有帮助按钮。</p> <p>app.helpfile=帮助文件全路径</p><p>再按F1或sendkeys "{F1}"</p>
页:
[1]