代码如下:Public Declare Function Htmlhelp Lib "hhctrl.ocx" Alias "HtmlHelpA" (ByVal hwndCaller As Long, ByVal pszFile As String, ByVal uCommand As Long, ByVal dwData As Any) As Long
Const HH_DISPLAY_TOPIC = &H0
Const HH_DISPLAY_INDEX = &H2
Const HH_HELP_CONTEXT = &HF
Const HH_DISPLAY_SEARCH = &H3
Const HH_DISPLAY_TEXT_POPUP = &HEPrivate Sub cmdHelp_Click()
Const HH_DISPLAY_TOPIC = &H0
App.HelpFile = App.Path & "\help.chm"
Call Htmlhelp(hwnd, App.HelpFile, HH_DISPLAY_TOPIC, ByVal "123\123.htm")
End Sub我按下cmdHelp时可以调出帮助文件,但怎样才能按下F1键调出帮助文件呢?

解决方案 »

  1.   

    工程---属性---帮助文件名,选择你的帮助文件,就可以了或者加一句:
        App.HelpFile = "f:\vbch.chm"
      

  2.   

    App.HelpFile = App.Path & "\help.chm"
      

  3.   

    那么如何象.hlp 一样设定应用上下文id
    就是对一个控件设定后,chm文件直接打开对应的页关注
      

  4.   

    Private Sub Command1_Click()
       App.HelpFile = "D:\xxx\xxxx\xxx.chm"
       SendKeys "{F1}"
    end sub
      

  5.   

    一、工程-->属性-->帮助文件名,选择你的帮助文件
    二、App.HelpFile = "f:\vbch.chm"
      

  6.   

    我上面用的代码可以直接打开chm文件中的指定的页面,现在想用F1键直接打开,不用在制作一个按钮了。