你是想调用帮助文件吧,没那么麻烦吧,Private Declare Function HtmlHelpA Lib "hhctrl.ocx" (ByVal hwndCaller As Long, ByVal pszFile As String, ByVal uCommand As Long, ByVal dwData As Long) As Long 调用:HtmlHelpA Form1.hWnd, App.HelpFile,0, 0 最笨的办法, Sub Command1_Click() SendKeys "{F1}" End Sub
调用:HtmlHelpA Form1.hWnd, App.HelpFile,0, 0 最笨的办法,
Sub Command1_Click()
SendKeys "{F1}"
End Sub