|
Página 1 de 1
|
Texto Y Un Número, Seguir La Serie
| Autor |
Mensaje |
 Sher852 
Usuario
Registrado: Febrero 2013
Mensajes: 4
Edad: 33
|
 Texto Y Un Número, Seguir La Serie
Hola a todos de nuevo
Sigo peleandome con el gambas 3. Ahora la pregunta que tengo es la siguiente:
 Tengo un textbox con una cadena de texto y número, quisiera que con un botón se mantenga la cadena pero sumando +1 al número. No se si me explico bien.
Sería algo así:
Enemigo 1 -> [BOTÓN] -> Enemigo 2
Escribo Enemigo 1 en el textbox y para ahorrarme estar escribiendo "Enemigo 2" y siguientes, el botón se encargaría de ello.
¿Cómo se puede lograr en el gambas?
Gracias por la ayuda 
|
#1 Viernes, 01 Marzo 2013, 11:09 |
|
 |
shordi
Analista Programador
Registrado: Septiembre 2009
Mensajes: 4982
Edad: 64 Ubicación:  Albacete
|
Re: Texto Y Un Número, Seguir La Serie
Prueba con:
public sub buttonsuma_click()
dim n as integer
n=rInstr(enemigo1.text," ") 'suponiendo que ese espacio separa lo que contenga enemigo y el número, si es otro caracter, sustituyelo
enemigo2.text=left(enemigo1.text,n) & val(mid(enemigo1.text,n-1)+1)
end
Lo que hace cada función lo tienes en las ayudas.
última edición por shordi el Viernes, 01 Marzo 2013, 11:39; editado 1 vez |
#2 Viernes, 01 Marzo 2013, 11:37 |
|
|
Sher852
Usuario
Registrado: Febrero 2013
Mensajes: 4
Edad: 33
|
Re: Texto Y Un Número, Seguir La Serie
Lo he puesto y me aparece:
"No coinciden los tipos: Requerido Float, obtenido String en cambio"
En esta línea -> enemigo2.text=left(enemigo1.text,n) & val(mid(enemigo1.text,n-1)+1)
Gracias por tu ayuda ^^
PD: Sigo mirando el código en busca del error. Estoy muy verde xD
EDIT: Le quito esa línea y compruebo que valor me da para la "n" y es 8. Lo que esta contando la "n" es las letras + el espacio. (ENEMIGO ). Sin no hay espacio en la frase no cuenta y da 0 como valor
última edición por Sher852 el Viernes, 01 Marzo 2013, 17:00; editado 2 veces |
#3 Viernes, 01 Marzo 2013, 16:53 |
|
|
shordi
Analista Programador
Registrado: Septiembre 2009
Mensajes: 4982
Edad: 64 Ubicación: Albacete
|
Re: Texto Y Un Número, Seguir La Serie
Bueno ya te digo en el propio código que si no hay espacios, debes sustituir el espacio por el caracter que separe el numero del resto del contenido del texto.
Si lo que tienes es "Enemigo1", todo junto, cambia la función a
Por otra parte hay un error: no es -1 es +1
Quedaría así:
public sub buttonsuma_click()
dim n as integer
n=rInstr(enemigo1.text," ") +1 'suponiendo que ese espacio separa lo que contenga enemigo y el número, si es otro caracter, sustituyelo
enemigo2.text=left(enemigo1.text,n) & val(mid(enemigo1.text,n)+1)
end
última edición por shordi el Viernes, 01 Marzo 2013, 18:00; editado 1 vez |
#4 Viernes, 01 Marzo 2013, 17:52 |
|
|
|
|
 Temas parecidos
 Temas parecidos
|
|
Página 1 de 1
|
Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno
|
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario
|
|
|
|
|
