you can do this by the given example
''************* *************** **********
Imports System
Imports System.Drawing
Imports System.Componen tModel
Imports System.Windows. Forms
Public Class Form1
Inherits System.Windows. Forms.Form
Private helpfile As String = "mspaint.ch m"
Private WithEvents showIndex As
System.Windows. Forms.Button
Private WithEvents showHelp As
System.Windows. Forms.Button
Private WithEvents label1 As System.Windows. Forms.Label
Private WithEvents navigatorCombo As
System.Windows. Forms.ComboBox
Private WithEvents showKeyword As
System.Windows. Forms.Button
Private WithEvents keyword As
System.Windows. Forms.TextBox
Private WithEvents label2 As System.Windows. Forms.Label
Private WithEvents label3 As System.Windows. Forms.Label
Private WithEvents parameterTextBo x As
System.Windows. Forms.TextBox
<STAThread()> _
Shared Sub Main()
Application.Run (New Form1)
End Sub 'Main
Public Sub New()
Me.showIndex = New System.Windows. Forms.Button
Me.showHelp = New System.Windows. Forms.Button
Me.navigatorCom bo = New
System.Windows. Forms.ComboBox
Me.label1 = New System.Windows. Forms.Label
Me.showKeyword = New System.Windows. Forms.Button
Me.keyword = New System.Windows. Forms.TextBox
Me.label2 = New System.Windows. Forms.Label
Me.label3 = New System.Windows. Forms.Label
Me.parameterTex tBox = New
System.Windows. Forms.TextBox
' Help Navigator Label
Me.label1.Locat ion = New System.Drawing. Point(112,
64)
Me.label1.Size = New System.Drawing. Size(168, 16)
Me.label1.Text = "Help Navigator:"
' Keyword Label
Me.label2.Locat ion = New System.Drawing. Point(120,
184)
Me.label2.Size = New System.Drawing. Size(100, 16)
Me.label2.Text = "Keyword:"
' Parameter Label
Me.label3.Locat ion = New System.Drawing. Point(112,
120)
Me.label3.Size = New System.Drawing. Size(168, 16)
Me.label3.Text = "Parameter: "
' Show Index Button
Me.showIndex.Lo cation = New System.Drawing. Point
(16, 16)
Me.showIndex.Si ze = New System.Drawing. Size(264,
32)
Me.showIndex.Ta bIndex = 0
Me.showIndex.Te xt = "Show Help Index"
' Show Help Button
Me.showHelp.Loc ation = New System.Drawing. Point
(16, 80)
Me.showHelp.Siz e = New System.Drawing. Size(80, 80)
Me.showHelp.Tab Index = 1
Me.showHelp.Tex t = "Show Help"
' Show Keyword Button
Me.showKeyword. Location = New System.Drawing. Point
(16, 192)
Me.showKeyword. Size = New System.Drawing. Size(88,
32)
Me.showKeyword. TabIndex = 4
Me.showKeyword. Text = "Show Keyword"
' Help Navigator Combo
'
Me.navigatorCom bo.DropDownStyl e =
System.Windows. Forms.ComboBoxS tyle.DropDownLi st
Me.navigatorCom bo.Location = New
System.Drawing. Point(112, 80)
Me.navigatorCom bo.Size = New System.Drawing. Size
(168, 21)
Me.navigatorCom bo.TabIndex = 2
' Keyword TextBox
Me.keyword.Loca tion = New System.Drawing. Point
(120, 200)
Me.keyword.Size = New System.Drawing. Size(160, 20)
Me.keyword.TabI ndex = 5
Me.keyword.Text = ""
'
' Parameter TextBox
'
Me.parameterTex tBox.Location = New
System.Drawing. Point(112, 136)
Me.parameterTex tBox.Size = New System.Drawing. Size
(168, 20)
Me.parameterTex tBox.TabIndex = 8
Me.parameterTex tBox.Text = ""
' Set up how the form should be displayed and add
the controls to the form.
Me.ClientSize = New System.Drawing. Size(292, 266)
Me.Controls.Add Range(New
System.Windows. Forms.Control() {Me.parameterTe xtBox, _
Me.label3, Me.label2,
Me.keyword, Me.showKeyword, _
Me.label1,
Me.navigatorCom bo, Me.showHelp, Me.showIndex})
Me.FormBorderSt yle =
System.Windows. Forms.FormBorde rStyle.FixedDia log
Me.Text = "Help App"
' Load the various values of the HelpNavigator
enumeration
' into the combo box.
Dim converter As TypeConverter
converter = TypeDescriptor. GetConverter(Ge tType
(HelpNavigator) )
Dim value As Object
For Each value In converter.GetSt andardValues()
navigatorCombo. Items.Add(value )
Next value
End Sub 'New
Private Sub showIndex_Click (ByVal sender As Object,
ByVal e As System.EventArg s) Handles showIndex.Click
' Display the index for the Help file.
Help.ShowHelpIn dex(Me, helpfile)
End Sub 'showIndex_Clic k
Private Sub showHelp_Click( ByVal sender As Object,
ByVal e As System.EventArg s) Handles showHelp.Click
' Display Help using the Help navigator enumeration
' that is selected in the combo box. Some
enumeration
' values make use of an extra parameter, which can
' be passed in through the Parameter text box.
Dim navigator As HelpNavigator =
HelpNavigator.T ableOfContents
If Not (navigatorCombo .SelectedItem Is Nothing)
Then
navigator = CType(navigator Combo.SelectedI tem,
HelpNavigator)
End If
Help.ShowHelp(M e, helpfile, navigator,
parameterTextBo x.Text)
End Sub 'showHelp_Click
Private Sub showKeyword_Cli ck(ByVal sender As Object,
ByVal e As System.EventArg s) Handles showKeyword.Cli ck
' Display Help using the provided keyword.
Help.ShowHelp(M e, helpfile, keyword.Text)
End Sub 'showKeyword_Cl ick
End Class 'Form1
''************* *************** **********
cheers
Sanjeev Azad
CoreBrix
-----Original Message-----
Dear All
Please tell me how to assosiate help files
with my Vb.netProject.
Regards
Sudheer
.