Access Word Document

[svm]

I have a program that needs to browse the drive and directory and also select a Word Document Filename but I don't know how to insert a command in order to retrieve Word Document. Can anyone finish my coding ? Appreciate to any help you can give me. Thanks. Private Sub Command1_Click()

Program goes like this :

Dim i As Integer

Text2.Text = ""

For i = 0 To File1.ListCount - 1
If File1.Selected(i) Then
Text2.Text = Text2.Text & File1.List(i) & vbCrLf
End If
Next i

End Sub

Private Sub Dir1_Change()
Dir1.Path = "g:\maps"
File1.Path = Dir1.Path
File1.Refresh

End Sub

Private Sub Drive1_Change()

Dir1.Path = Drive1.Drive
Dir1.Refresh

End Sub




Private Sub Text1_Change()

File1.Pattern = Text1.Text

End Sub