|
发表于 2009-3-25 17:02:00
|
显示全部楼层
下面是使用commondialog控件的一段程序:
Private Sub Command2_Click()
With CommonDialog1
.HelpFile = App.Path & "\MakeCHM.chm"
'进入“Help“文件的 Click Event 标题。
'“.chm”文件的数字值是由“.HPJ”文件
'的[MAP]部分决定的。只有当你用
'“Microsoft Help Workshop“建立
'自己的帮助文件时,
'才可以编辑此数字值。
.HelpContext = 200
.HelpCommand = cdlHelpContext
.ShowHelp
End With
End Sub
但发现对CHM文件不起作用。只对HLP文件有效果。这是大多数教材、有关这方面书籍及VB6.0的MSDN帮助中介绍的方法。不知道什么原因,不能运行。
VB6.0、AutoCad VBA不是不支持调用有上下文ID的帮助文件。在AutoCad VBA中使用inputbox可以证明这一点:
Private Sub CommandHelp_Click()
InputBox "按下帮助按钮打开相关主题帮助文件", , , , , Left(Application.Preferences.Files.TemplateDwgPath, 1) & ":\equipment\help\bdqpmt.chm", 2000
|
|