Right en VB

ISAILOVIC

Tengo un texto, donde me aparecen 3 cosas: marca-modelo-numero de serie; cada una de ellas viene separada por un espacio en blanco. Quisiera seleccionar solo el numero de serie..se que tengo que usar la propiedad right de esa cadena de texto y que seleccione hasta que encuentre un espacio en blanco..sabeis como hacerlo?

gracias

Soltrac

Yo no me complicaria y haria esto:

(Te lo pondre con sintaxis de .NET , pasala a VB 6 tu)

Dim Aux() As String

Aux=Split(TuCadena) // Esto divide la cadena por espacios

// en Aux(0) estara la primera palabra
// en Aux(1) la segunda
// en Aux(3) la tercera
// etc.

SiNSoNiDo

bueno en vb 6 yo utilizaría mid así ->

' no sé donde tienes el texto así q haré como si estuviera en un textbox

For i = Len(Text1.Text) To 0 Step -1
If (Mid(Text1.Text, i, 1) = " ") Then
j = i
Exit For
End If
Next

MsgBox (Mid(Text1.Text, j + 1, Len(Text1.Text)))

Básicamente recorro la cadena "marca-modelo-número de serie" desde el final hasta q encuentre un espacio en blanco y después escojo la parte de la cadena desde la posición del espacio en blanco encontrado + 1 posición más hasta el final de la cadena y así obtengo el número de serie.

fácil, sencillo y para toda la familia ^^

ISAILOVIC

Ya funciona
Muchas gracias

Usuarios habituales

  • ISAILOVIC
  • SiNSoNiDo
  • Soltrac