Visual Basic - Como llamar a un fichero de ayuda *.chm con VB6

Hola a todos y feliz Navidad.

Desde VB6 como se llama a un archivo de ayuda de tipo *.chm?

Para llamar a uno de tipo *.hlp, no tengo problema, hago así:
Private Sub mnuAyIndice_Click()
Dim R As Integer
App.HelpFile = "Ayuda.hlp"
R = WinHelp(hwnd, (App.HelpFile), &H3, 0)
End Sub

Y en un modulo.bas, tengo declarado:
Option Explicit
Public Declare Function WinHelp Lib "user32" Alias "WinHelpA" (ByVal _
hwnd As Long, ByVal lpHelpFile As String, ByVal wCommand As _
Long, ByVal dwData As Long) As Long

Me lo ha solucionado "seba123neo" de la siguiente manera:

Hola, con la api ShellExecute abris cualquier tipo de archivos...

Código:
Private Declare Function ShellExecute Lib "Shell32.Dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal pOperation As String, ByVal pFile As String, ByVal pParameters As String, ByVal pdirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Command1_Click()
Dim X As Long
X = ShellExecute(Screen.ActiveForm.hWnd, "open", "C:documento.chm", vbNullString, vbNullString, 1)
End Sub

Excelente informacion...