怎样将.chm的文件与程序相连!高分求教!!!!!!

呵呵，救星来也！
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongPrivate Sub mnuHelp_Click()                           '帮助
Dim yourHELP As Long
Dim HelpChmFile As String
HelpChmFile = App.Path & "\" & "help.chm"
yourhelp = ShellExecute(0&, vbNullString, HelpChmFile, vbNullString, vbNullString, vbNormalFocus)End Sub试试，只需把HELP.CHM改成你的CHM名称即可！