(VB6)chm帮助文件自动定位

在开发软件的时候，我们有时候要使用帮助文件给用户提示。比如软件要注册，而详细注册方法在帮助文件中，这时我们就可以通过软件打开帮助文件，直接跳转到注册页面即可。

那么这个功能怎么实现呢？本次我就给大家奉上代码。

Private Declare Function HtmlHelp Lib "hhctrl.ocx" Alias "HtmlHelpA" (ByVal hWnd As Long, ByVal lpFile As String, ByVal lpParameters As Long, ByVal nShowCmd As Long) As Long
Private Const HH_DISPLAY_TOPIC = &H0
'下面这个写在具体的事件里，比如Click事件。
Dim a As Long
a = HtmlHelp(me.hwnd,"C:\help.chm::/注册/注册方法.htm#1", HH_DISPLAY_TOPIC, 0)

那么怎么获取路径呢？

有个很简单的方法，打开chm文件，找到指定页面，然后右击选择属性，里面就有具体路径。