Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: R3Z en 6 Julio 2015, 19:53 PM

Título: Problemita Con Los TextBox en VB6
Publicado por: R3Z en 6 Julio 2015, 19:53 PM
Tengo Un Problemita Con Los Textbox

tengo 3 textbox  con diferentes nombre

Código (vb) [Seleccionar]
TXTprecio = Format(Val(TXTprecio.Text), "Currency")
Form4.lblprecio = Form2.TXTprecio.Text


en el form4 me sale el precio pero si le agrego otro textbox no me sale
y asi sucesivamente

Código (vb) [Seleccionar]
TXTprecio = Format(Val(TXTprecio.Text), "Currency")
Form4.lblprecio = Form2.TXTprecio.Text

Precio = Format(Val(Precio.Text), "Currency")
Form4.lblprecio = Form2.Precio.Text



Estaba Pensando en poner if y then a cada uno

Código (vb) [Seleccionar]
if Precio = Format(Val(Precio.Text), "Currency") then
Form4.lblprecio = Form2.Precio.Text


mi pregunta es como hago para que  los que yo digito en los textbox's me salen en el form(4)

Código (vb) [Seleccionar]

Form4.lbldinero = Form2.precio.Text
Form4.lblprecio = Form2.textprecio.Text
Form4.lblprecio = Form2.txtprecio.Text


solo me sale lblprecio=0 con los 3  pero si tengo 1 me sale el precio en form4
Título: Re: Problemita Con Los TextBox en VB6
Publicado por: R3Z en 6 Julio 2015, 20:41 PM
Problema Resuelto


Informe=Todavia Me Salio A lo Primero Ahora No me quiere salir


Código (vb) [Seleccionar]
TXTprecio = Format(Val(TXTprecio.Text), "Currency")
Form4.lblprecio = Form2.TXTprecio.Text

Precio = Format(Val(Precio.Text), "Currency")
Form4.lblprecio = Form2.Precio.Text

TextPrecio = Format(Val(TextPrecio.Text), "Currency")
Form4.lblprecio = Form2.TextPrecio.Text

preciotext = Format(Val(preciotext.Text), "Currency")
Form4.lblprecio = Form2.preciotext.Text