Weno, pos eso, es una duda muy basica, pero fundamental para proseguir mi programa, weno, hay va:
Por ejemplo, yo ago que el programa se lea a si mismo y en una variable de 16 casillas enkonntrebos esto:
Hendrix The Best
Mi duda es komo se hace para que en la variable solo se almacene esto: Hendrix The??? Se necesita crear otra variable para hacer esto???
Plis, nesecito ayuda porfa...
Salu2 y gracias
Hendrix
Weno, ya e echo un pekeño paso, e "descifrado" este kode que sirve para kitar el nº de letras que tiene la "firma" de la string:
Dim a As String
Dim up As Integer
a = Text1.Text
up = Len(a) - 4
Text2.Text = Len(a)
Text3.Text = up
en el Text3 sale el nº de letras que kedan en el TExtbox, ahora lo que no se hacer es komo rekorrer este textbox (que en mi proyecto sera una string, pero supongo que da =)
Habia pensadfo en recorrerlo con un for de esta forma:
For I=1 to Len(Text1.Text) -4
Text1.Text = posicionnºI del Text2.Text
Next
pero no se poner en el text1.text la letra que korresponde a la posicion nº I del textbox...
Weno, Gracias de antemano..
Salu2
Hendrix
Hola, si la variable que elegiste es del tipo String, puedes moderar la cantidad de caracteres que se visualizarán. ademas, si tendras que crear otra variable pero mas pequeña, par ver el contenido de la anterior, no olvides vaciar el contenido de cada variable cuando deje de usarse para evitar el uso de memoria...
Private Sub Command1_Click()
Dim Zero As String * 16, Shield As String * 11
Zero = "Hendrix The Best"
Shield = Zero
MsgBox Shield
End Sub
En cuanto al colocar el valor que ocupa la posicion "I" de la respuesta anterior(Punk-Rock), se usa la propiedad "SelStart" del TextBox, ejemplo: TextBox1.Selstart = I
Gracias Zero!!! ahora mismo lo provare....
Weno, gracias por kontestar ;) ;)
Salu2
Hendrix
La funcion para trabajar con subcadenas es mid:
cad1="Hendrix The Best"
cad2=mid(cad1,1,11)
En el ejemplo devuelve en cad2 11 caracteres contando a partir del 1ro, o sea: Hendrix The
Mas simple si cabe:
Dim Entera, Parte as string
Entera = "Hendrix The Best"
Parte = Left(Entera,11)
Salu2