Te paso un ejemplo para ver si te sirve... usando "vbTab"

Private Sub Form_Load()
    Dim sCadena As String
    Dim sColumnas() As String
    Dim iCont As Integer

    'Cargo cadena de ejemplo
    sCadena = "hola" & vbTab & "como" & vbTab & "estas"
    'Separo las columnas por TAB
    sColumnas = Split(sCadena, vbTab)

    For iCont = 0 To UBound(sColumnas)
        MsgBox sColumnas(iCont)
    Next

    Unload Me
End Sub

Saludos!!!




Carlos Adolfo Codesido wrote:
*Estimados listeros:*

Necesito importar desde una aplicación VB6 un archivo de texto hacia una tabla de Access. El problema es que dicho archivo, tiene los campos separados por un tabulador y cuando lo abro con VB este delimitador de columna me aparece con un carácter que VB no reconoce (un recuadro).

Intento cortar los campos utilizando la función Mid, pero la longitud de algunas columnas es variable con lo cual no me sirve.

Adjunto a este correo uno de estos archivos en cuestion.

Desde ya muchas gracias por la ayuda que puedan brindarme.

**Carlos Adolfo Codesido**

** [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>*

*MSN: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>*

* *

**

* *



Responder a