Visual Basic - Imprimir archivo

Hola
Alguien sabe como mandar imprimir desde vb un archivo txt y un archivo de word.
Gracias de antemano!!!!

Para el documento Word:
Coloca en un formulario: 1 commandButton 1 CommonDialog y codificas lo siguiente:

Private Sub Command1_Click()
CommonDialog1.Filter = "Documentos de Word (*.doc)|*.doc"
CommonDialog1.DialogTitle = "Elija el documento de Word.."
CommonDialog1.ShowOpen
If Not IsNull(CommonDialog1.FileName) Then
Call ImprimirDocumentoWord(CommonDialog1.FileName)
End Sub

Public Sub ImprimirDocumentoWord(Fichero As String)
Dim Word As New Word.Application
Dim Channel As Long
'Abrimos el fitxero en word
Channel = Word.DDEInitiate("winword", """" & Fichero & """")
'Lo imprimimos
Word.DDEExecute Channel, "[FILEPRINT,0]"
'Cerramos el fichero
Word.DDEExecute Channel, "[FILEEXIT]"
'Txapamos el programa
Word.DDETerminate Channel
End Sub

Para el archivo texto:
1.- Podrías con una instrcucción Shell enviar un TYPE fichero >PRN ó TYPE fichero > LPT1 y debería imprimir el archivo.
2.- Extraer el contenido en un richtextbox y luego imprimir con el método que el ricttextbox tiene.

me da el error 'No se ha definido el tipo definido por el usuario' y se detiene en la segunda linea ==>
Public Sub ImprimirDocumentoWord(Fichero As String)
==> Dim Word As New Word.Application
Dim Channel As Long
'Abrimos el fitxero en word
Channel = Word.DDEInitiate("winword", """" & Fichero & """")
'Lo imprimimos
Word.DDEExecute Channel, "[FILEPRINT,0]"
'Cerramos el fichero
Word.DDEExecute Channel, "[FILEEXIT]"
'Txapamos el programa
Word.DDETerminate Channel
End Sub

la opcion de printer sale presionando ctrl + j
aqui tienes lo que buscas
eso es todo, la impresion se realizara con la printer determinada

With Printer
.Font = "courier"
.FontSize = 10
End With
Printer.Print Text1.Text
Printer.EndDoc