Duda pekeñiiiiiisima

Iniciado por Hendrix, 12 Febrero 2006, 23:00 PM

0 Miembros y 1 Visitante están viendo este tema.

Imprimir
Ir Abajo Páginas1
Acciones del Usuario

Hendrix

12 Febrero 2006, 23:00 PM
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

"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián

Hendrix

#1
12 Febrero 2006, 23:32 PM
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:

Código [Seleccionar]
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

"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián

zero_shield

#2
12 Febrero 2006, 23:37 PM
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
Amare et Sapere vix Deo Conceditur...

Hendrix

#3
13 Febrero 2006, 16:01 PM
Gracias Zero!!! ahora mismo lo provare....

Weno, gracias por kontestar  ;) ;)

Salu2

Hendrix

"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián

Ironhorse

#4
14 Febrero 2006, 00:03 AM
La funcion para trabajar con subcadenas es mid:
Código [Seleccionar]

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
Pégense una vuelta por Cracton :)

Kizar

#5
14 Febrero 2006, 22:54 PM
Mas simple si cabe:

Código [Seleccionar]

Dim Entera, Parte as string
Entera = "Hendrix The Best"
Parte = Left(Entera,11)


Salu2
Imprimir
Ir Arriba Páginas1
Acciones del Usuario