VB.NET對(duì)CHM幫助進(jìn)行調(diào)用可以通過很多種方法來實(shí)現(xiàn)。那么具體使用何種方法要根據(jù)我們?cè)趯?shí)際編程中不同的環(huán)境來進(jìn)行選擇。首先讓我們一起來對(duì)這些VB.NET調(diào)用CHM幫助的方法進(jìn)行一個(gè)初步的認(rèn)識(shí)，方便我們做出選擇。

一個(gè)應(yīng)用程序不論編制得如何完美，在很多情況下用戶還是會(huì)對(duì)如何使用它提出問題。 Visual Basic 提供了對(duì)兩種不同幫助系統(tǒng)的支持：傳統(tǒng)的 Windows 幫助系統(tǒng) (WinHelp)和新的 HTML 幫助（CHM幫助）。當(dāng)我們制作好幫助文件后，就需要在程序的適當(dāng)位置編寫代碼進(jìn)行調(diào)用，本文將討論幾種在程序中調(diào)用CHM幫助文件的方法。

VB.NET調(diào)用CHM幫助方法一　使用F1鍵：

這種方法最簡(jiǎn)單，只需如下代碼即可：

        
            
Private Sub Form_Load()               
App.HelpFile = app.path & "\help.chm"               
'調(diào)用與主程序同目錄下的help.chm幫助文件，按F1鍵調(diào)用               
End Sub  
        
        

VB.NET調(diào)用CHM幫助方法二 使用SendKeys方法：

        
            
Private Sub Form_Load()               
App.HelpFile = app.path & "\help.chm"               
End Sub               
private Sub CmdHelp_Click()               
SendKeys "{F1}" '發(fā)送擊鍵到活動(dòng)窗口               
End Sub  
        
        

VB.NET調(diào)用CHM幫助方法三 使用Shell函數(shù)：

        
            
private Sub CmdHelp_Click()               
Shell "hh.exe help.chm", vbNormalFocus             
'help.chm為指定的幫助文件，可包含路徑。               
End Sub  
        
        

VB.NET調(diào)用CHM幫助方法四 使用HtmlHelp函數(shù)：

先聲明如下API：

        
            
Option Explicit               
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               
'hwndCaller指定調(diào)用者的窗口，pszFile指定要調(diào)用的文件，
uCommand是發(fā)送給 HtmlHelp的命令，dwData是uCommand的參數(shù)。 
        
        

然后在過程中調(diào)用：

        
            
private Sub CmdHelp_Click()               
dim i as string               
i = app.path & "\help.chm"               
'用變量i記錄與主程序同目錄下的help.chm幫助文件               
HtmlHelpA Form1.hWnd, i, 0, 0               
End Sub  
        
        

VB.NET調(diào)用CHM幫助方法五 使用ShellExecute函數(shù)：

先聲明如下API：

        
            
Option Explicit               
'聲明API函數(shù)用于異步打開一個(gè)文檔               
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 Long               
Private Const SW_SHOWNORMAL = 1  
        
        

然后在過程中調(diào)用： 

        
            
private Sub CmdHelp_Click()               
dim a as long               
Dim b As String               
b = App.Path & "\help.chm"               
'用變量b記錄與主程序同目錄下的help.chm幫助文件               
a = ShellExecute (0, "open", b, "", "", SW_SHOWNORMAL)               
End Sub  
        
        

以上五種VB.NET調(diào)用CHM幫助的方法各有優(yōu)缺點(diǎn)，從代碼的簡(jiǎn)單上講，建議使用第二種方法。從功能上講，建議使用第五種方法，因其不只用于打開CHM幫助文件，還可用同樣的格式打開、打印或查找一個(gè)文件或文檔（參見該API的說明資料）。

【編輯推薦】

1. VB.NET修改系統(tǒng)時(shí)間技巧總結(jié)
2. VB.NET DoEvents重要性體現(xiàn)
3. VB.NET System.IO在實(shí)際編程中的作用體現(xiàn)
4. VB.NET泛型類型基本概念詳解
5. 特殊的VB.NET數(shù)據(jù)類型概述