Ayuda con presentación de variables en un .Text

Participa en el tema Ayuda con presentación de variables en un .Text en el foro Programación.
Hola... Bueno, quiero hacer algo como esto: Ejemplo: Valor1 = x Valor2 = y Y ...

Buscar en este tema:

Búsqueda avanzada

1 2 >

desconectado
- 20
  
  MENSAJES
balck-pine escribió hace 9 meses

¿Mensaje inapropiado?

#1 Ayuda con presentación de variables en un .Text

Hola...

Bueno, quiero hacer algo como esto:

Ejemplo:
Valor1 = x
Valor2 = y

Y que en el text1.Text se vea algo como esto:
Datox=1-y-0-0
Datox+1=1-y-1-1
Datox+2=1-y-2-2
(Y que continúe así hasta aproximadamente Dato x+30)

No sé si me expliqué bien, pero la idea es que al presionar un botón aparezca en un cuadro de texto una palabra (Dato), junto a él el valor1+otra valor x que no varía, que luego aparezcan otros datos fijos (=1-), luego el Valor2 sin ninguna modificación y luego otros valores que irían variando en cada línea o renglón.

Espero que me haya expresado bien...

Desde ya, Muchas Gracias...

Saludos.

Black-Pine

Responder a este tema

Citar

+

0

Me gusta

| Más
desconectado
- 258
  
  MENSAJES
shiwax escribió hace 9 meses ¿Mensaje inapropiado?

#2 Re: Ayuda con presentación de variables en un .Text

quieres solo concatenar los valores???

osea... un simple :

Text1.Text = Valor1 & " + " & Valor2 & " - 1 - 1"

mmm... eso fue lo que entendi... explicame mejor y te puedo ayudar!

Saludos

Responder

Citar

Me gusta este mensaje

desconectado
- 20
  
  MENSAJES
balck-pine escribió hace 9 meses ¿Mensaje inapropiado?

#3 Re: Ayuda con presentación de variables en un .Text

Originalmente publicado por shiwax

quieres solo concatenar los valores???

osea... un simple :

Text1.Text = Valor1 & " + " & Valor2 & " - 1 - 1"

mmm... eso fue lo que entendi... explicame mejor y te puedo ayudar!

Saludos

Mirá... Sería algo así... Lo voy a hacer con números para que se entienda...

Hay 2 cuadros de texto donde se colocan 2 numeros diferentes.
El primero toma el nombre de Valor1 y el segundo Valor2.
Estonces queda así

Valor1 = 8
Valor2 = 120

Entonces cuando se presione un botón quedaría así:

Dato8 = 1-120-0-0-50-50
Dato9 = 1-120-1-1-50-50
Dato10 = 1-120-2-2-50-50
Y continuaría...

*La idea es que el Valor1 iría aumentando a 1 en cada línea.
*El valor2 seguiría siempre igual.
*Los 2 primeros números que siguen del valor2 irían aumentando en cada línea pero sin ninguna relación con los números ingresados...
*Los últimos 2 números serían siempre iguales.

Pero lo que quiero logra es que los últimos números que están por detras del valor2 (120) sea una línea pactada por mi, y que no sea una Variable a la cual se le suman números.

Sino me podés enviar tu msn por MP y hablamos a la brevedad, o te envío el mio...

Desde ya, muchísimas gracias.. Saludos!

Responder

Citar

Me gusta este mensaje
desconectado
- 1,588
  
  MENSAJES
HeavenMight escribió hace 9 meses ¿Mensaje inapropiado?

#4 Re: Ayuda con presentación de variables en un .Text

Es facil ahora no puedo pero cuando "BACKEO" a mi casa me pongo y te tiro un ejemplo, es un DO - LOOP con 2 variables que se incrementan y la concatenacionde Valor1 y el incremento de Valor2
cuando llego a mi casa edito esto y te pongo la respuesta

Responder

Citar

Me gusta este mensaje
desconectado
- 258
  
  MENSAJES
shiwax escribió hace 9 meses ¿Mensaje inapropiado?

#5 Re: Ayuda con presentación de variables en un .Text

Dato8 = 1-120-0-0-50-50
Dato9 = 1-120-1-1-50-50
Dato10 = 1-120-2-2-50-50

SIGUIENDO CON EL EJEMPLO

FOR Con = 1 TO 100
LIST1.AddItem "Dato" & VALOR1 & " = 1 - " & VALOR2 & " - " & CON - 1 & " - " & CON - 1 & " - 50 - 50"
VALOR1 = VALOR1 + 1
NEXT Con

Editado por shiwax - 17.02.2009 13:44 hs.

Responder

Citar

Me gusta este mensaje

desconectado

1,588

MENSAJES

HeavenMight escribió hace 9 meses ¿Mensaje inapropiado?

#6 Ayuda con presentación de variables en un .Text

Llegue un poquitooooo tarde, shiwax me escupio el asado

.
Mira agrega un "List1" al formulario y en el FORM LOAD pega este codigo

Código:

Private Sub Form_Load()
Dim i As Integer
Dim valor1 As String
Dim valor2 As String
Dim Limite As String
Do
    valor1 = InputBox("Ingrese el Primer Numero", "Ingrese un numero")
    valor2 = InputBox("Ingrese el Segundo Numero", "Ingrese un numero")
    Limite = InputBox("Ingrese la cantidad de veces que desea realizar el proceso", "Ingrese un numero")
    If IsNumeric(valor1) And IsNumeric(valor2) And IsNumeric(Limite) Then
        For i = 1 To Limite
            List1.AddItem "Dato" & valor1 & " = 1-" & valor2 & "-" & i - 1 & "-" & i - 1 & "-50-50"
            valor1 = valor1 + 1
        Next i
        Exit Sub
    Else
        MsgBox "Ha Ingresado Letras o simbolos, Intente Nuevamente", vbOKOnly + vbCritical, "Datos Incorrectos"
    End If
Loop
End Sub

Archivos adjuntos

Proyecto.rar (1.4 KB, 1 vistas)

Responder

Citar

Me gusta este mensaje

desconectado
- 20
  
  MENSAJES
balck-pine escribió hace 9 meses ¿Mensaje inapropiado?

#7 Re: Ayuda con presentación de variables en un .Text

Muchisimas Gracias a los 2! Ahora lo pruebo y después les digo que salió.

Saludos

Responder

Citar

Me gusta este mensaje
desconectado
- 20
  
  MENSAJES
balck-pine escribió hace 9 meses ¿Mensaje inapropiado?

#8 Re: Ayuda con presentación de variables en un .Text

Perfecto! Me sirvió..

Muchísimas Gracias.

Pero le dejo una preguntita más a HeavenMight:

Supongamos que el Limite lo coloqué yo. (22). Osea.. saqué la función para que el usuario lo elija. Pero si quisiera que en cada línea en la parte de -1-1 dijera otros números que no serían correlativos y yo los pactaría desde la programación?

Sería por ejemplo así

Dato1=1-120-0-0-50-50
Dato2=1-120-25-0-50-50
Dato3=1-120-49-0-50-50
Dato4=1-120-0-45-50-50
Dato5=1-120-25-45-50-50
Dato6=1-120-49-45-50-50

Osea.. Lo que me gustaría es poder pactar lo que va a decir en los números en negrita según la línea.

Pero no es necesario que me prepares un ejemplo... Igual estuvo genial, pero para que pierdas tiempo no lo hagas. Sólo con más o menos decirme como sería la idea me basta.

Desde ya, Muchas Gracias.

Un abrazo.
-----Agregado el 18/2/2009 a las 08 : 25 : 34-----
Ah... Y otra cosa. Si quiero lo mismo que me diste antes, pero que sea en un Text ? Como para que se pueda seleccionar y copiar el resultado.

Saludos y Gracias.

Editado por balck-pine - 18.02.2009 19:25 hs. | Motivo: Mensajes unidos automáticamente

Responder

Citar

Me gusta este mensaje
desconectado
- 258
  
  MENSAJES
shiwax escribió hace 9 meses ¿Mensaje inapropiado?

#9 Re: Ayuda con presentación de variables en un .Text

si lo que quieres es que quede al azar usa el RANDOM...

si lo que quieres es que tu determines siempre una secuencia... por ejemplo... siempre sea 0 despues 25 y despues 45 en la primer posicion y cuando el cuclo termine cambie el valor de la segunda lo harias por codigo...

con tu ultima pregunta en lo personal creo que pides que te hagan tu trabajo...
eso de no querer pensar en cambiar el renglon...
valor1 = InputBox("Ingrese el Primer Numero", "Ingrese un numero")
por...
valor1 = Text1.text
es exesivo!!!! te hicieron el trabajo y no le hechas tantito coco???

la verdad prefiero ayudar dando pistas y respuestas abiertas a hacer el trabajo de otros... respero las respuestas de HeavenMight pero creo que no deberia ser tan presiso en sus respuestas para que no se cree un mal vicio!!!

Responder

Citar

Me gusta este mensaje

desconectado

1,588

MENSAJES

HeavenMight escribió hace 9 meses ¿Mensaje inapropiado?

#10 Re: Ayuda con presentación de variables en un .Text

Código:

Private Sub Form_Load()
Dim i As Integer
Dim valor1 As String
Dim valor2 As String
Dim Limite As String
Do
    valor1 = InputBox("Ingrese el Primer Numero", "Ingrese un numero")
    valor2 = InputBox("Ingrese el Segundo Numero", "Ingrese un numero")
    Limite = InputBox("Ingrese la cantidad de veces que desea realizar el proceso", "Ingrese un numero")
    If IsNumeric(valor1) And IsNumeric(valor2) And IsNumeric(Limite) Then
        For i = 1 To Limite
            List1.AddItem "Dato" & valor1 & " = 1-" & valor2 & "-" & Rnd(1) & "-" & i - 1 & "-50-50"
            valor1 = valor1 + 1
        Next i
        Exit Sub
    Else
        MsgBox "Ha Ingresado Letras o simbolos, Intente Nuevamente", vbOKOnly + vbCritical, "Datos Incorrectos"
    End If
Loop
End Sub

Ahi pones un random como dice shiwax y sale un numero aleatorio, eso es lo que querias no?

Originalmente publicado por shiwax

la verdad prefiero ayudar dando pistas y respuestas abiertas a hacer el trabajo de otros... respero las respuestas de HeavenMight pero creo que no deberia ser tan presiso en sus respuestas para que no se cree un mal vicio!!!

Por ahi tiene razon, pero apelo a que despues el va a tratar de ENTENDER que hizo, ya que si sos programador no vas a vivir de este foro

. Si no vamos mitad y mitad con el sueldo

Responder

Citar

Me gusta este mensaje

1 2 >

Estás en: Inicio >> Foros

« Tema anterior | Siguiente tema »

Relacionados
Populares
Usuarios Destacados

Estadísticas del tema

13 RESPUESTAS
169 VISTAS
3 USUARIOS RESPONDIERON

Ir arriba

Ayuda con presentación de variables en un .Text

Participa en el tema Ayuda con presentación de variables en un .Text en el foro Programación. Hola... Bueno, quiero hacer algo como esto: Ejemplo: Valor1 = x Valor2 = y Y ...

Participa en el tema Ayuda con presentación de variables en un .Text en el foro Programación.
Hola... Bueno, quiero hacer algo como esto: Ejemplo: Valor1 = x Valor2 = y Y ...