 Autor
|
Tema: Duda pekeñiiiiiisima (Leído 1,493 veces)
|
|
Hendrix
|
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
|
|
|
|
|
En línea
|
"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
|
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
|
|
|
|
|
En línea
|
"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
 Desconectado
Mensajes: 12
Dark Zero
|
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
|
|
|
|
|
En línea
|
Amare et Sapere vix Deo Conceditur... |
|
|
|
Hendrix
|
Gracias Zero!!! ahora mismo lo provare.... Weno, gracias por kontestar  Salu2 Hendrix |
|
|
|
|
En línea
|
"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
Desconectado
Mensajes: 150
|
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 |
|
|
|
|
En línea
|
Pégense una vuelta por Cracton  |
|
|
Kizar
Desconectado
Mensajes: 1.325
kizar_net
|
Mas simple si cabe:Dim Entera, Parte as string
Entera = "Hendrix The Best"
Parte = Left(Entera,11)
Salu2
|
|
|
|
|
En línea
|
|
|
|
|
 |
