Visual Basic - Leer archivo plano con caracter delimitador "|"

¿Como puedo leer unarchivo plano de tal forma que los datos que estan en el se puedan transferir a determinados campos de una tabla de una base de datos?. Por ejemplo el archivo de texto es asi:
| 141| |04143232731 |19/12/99 13-51| 0:15| 3* | 0.00| 20|
¿Como transfiero el campo "141", el campo "04143232731", el campo "19/12/99 13-51" y asi sucesivamente a diferentes campos de una tabla.
Lo lo he hecho cuando estan separados por coma "," pero separado por "|" lo le veo la salida.
Por favor ayudenme que llevo dias en esto.
gracias.

Acá te mando el código exacto como debes hacerlo
haber si te sirve
lo unico que he hecho ha sido almacenarlo en una matriz dinámica y luego escribirlo, en la concatenación que darás cuenta que ya están separados... ya tu verás donde los ubicas...

Private Sub Form_Load()
On Error Resume Next
Dim Ubica(1 To 20) As Integer
Dim sNewString() As String
Dim j As Integer, i as Integer
j = 0
sCad = "|141|04143232731 |19/12/99 13-51| 0:15| 3* | 0.00| 20| "
For i = 1 To Len(sCad)
m = Mid(sCad, i, 1)
If m = "|" Then
j = j + 1
Ubica(j) = i
End If
Next i
ReDim sNewString(j) As String
For i = 1 To j
sNewString(i) = Mid(sCad, Ubica(i) + 1, (Ubica(i + 1) - Ubica(i)) - 1)
Debug.Print sNewString(i)
Text1.Text = Text1.Text & " * " & sNewString(i)
Next i
End Sub

Gracias verdaderamente eso es exactamente lo que andaba buscando, mejor imposible, te agradezco mucho, cuando este listo el programa te lo mando para que lo veas.
Gracias