dos delimitadores para esplit
Publicado por danitza (6 intervenciones) el 09/10/2008 20:25:48
hola a todos ojala me puedan ayudar miren tengo un programa que lee un txt que contiene delimitadores al cual por pantalla le ingreso el delimitador por el cual debe cortar el texto, yo quiero ingresarle dos delimitadores pero no me funciona ya que me toma solo un delimitador no dos .
les dejo el codigo haver si alguien me puede ayudar.
Private Sub Command1_Click()
Dim inf As String
Dim strArray() As String
Dim intCount As Integer
Dim delimitador As String
Dim delimitador2 As String
delimitador = Text2
delimitador2 = Text4
inf = Text1
strArray = Split(inf, delimitador)
strArray = Split(inf, delimitador2)
List1.Clear
For intCount = LBound(strArray) To UBound(strArray)
Next
End Sub
ojala me puedan ayudar de ante mano muchas gracias
les dejo el codigo haver si alguien me puede ayudar.
Private Sub Command1_Click()
Dim inf As String
Dim strArray() As String
Dim intCount As Integer
Dim delimitador As String
Dim delimitador2 As String
delimitador = Text2
delimitador2 = Text4
inf = Text1
strArray = Split(inf, delimitador)
strArray = Split(inf, delimitador2)
List1.Clear
For intCount = LBound(strArray) To UBound(strArray)
Next
End Sub
ojala me puedan ayudar de ante mano muchas gracias
Valora esta pregunta


0