Visual Basic - ver archivos o abrir archivos

alguien q me ayude como puedo abrir un archivo (doc,xls,pdf,...etc), mediante un boton en VB6

es decir si tengo la ruta en mi text o label:
ejm
txtruta.text="c:\cali\maestrias.doc" o
lblver.caption="c:\cali\paises.pdf"

ya q tengo la ruta en esos text o label como puedo abrir mediante un boton:
usando esa rutas ya almacenadas porfavor ayuda plis GRACIAS

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 Sub Command1_Click()
Dim sPath As String, sFile As String
Dim lRet As Long
sPath = "c:\cali"
sFile = "paises.pdf"
lRet = ShellExecute(Me.hwnd, "Open", sFile, "", sPath, 1)
End Sub