Visual Basic.NET - Textbox Actualizados en Tiempo Real

Textbox Actualizados en Tiempo Real

Publicado por Eduardo (2 intervenciones) el 13/02/2017 21:03:52

Buenas tardes,

Mi inquietud es la siguiente: necesito realizar un formulario donde tenga múltiples textbox sin botones. Este formulario, realizará operaciones aritméticas introduciendo 4 datos de 14, necesito que los 10 textbox restantes se actualicen automáticamente en cuanto ya se esté introduciendo valores en los textbox iniciales. Todas las operaciones se realizan internamente en el código. Esto permitirá realizar iteraciones hasta conseguir los valores deseados.

He podido lograr realizar las operaciones y que se muestren pero con el botón.

El formulario que realicé inicialmente es así.

Espero puedan ayudarme saludos...

Ductolador

Valora esta pregunta

Me gusta: Está pregunta es útil y esta clara

No me gusta: Está pregunta no esta clara o no es útil

Responder

Pos: 4

Val: 605

Textbox Actualizados en Tiempo Real

Publicado por Diego (190 intervenciones) el 13/02/2017 22:36:46

Hola Eduardo, genera los calculos en el evento textChanged de los textbox que son editables. Vas a tener que tener cuidado al momento de eliminar todo el contenido de algun textbox para procesar un vacio como un valor numérico de 0. Es el unico detalle a tener en cuenta con los calculos.

Saludos y +bytes.

Valora esta respuesta

Me gusta: Está respuesta es útil y esta clara

No me gusta: Está respuesta no esta clara o no es útil

Comentar

Pos: 51

Val: 50

Textbox Actualizados en Tiempo Real

Publicado por Hugo (91 intervenciones) el 13/02/2017 22:38:42

Lo que puedes hacer es meter el código del botón aceptar en cada TextChanged de los textbox, así cuando cambie un valor realizara las operaciones de todos los texbox.

Private Sub TextBox1_TextChanged(sender As System.Object, e As System.EventArgs) Handles TextBox1.TextChanged

End Sub

Saludos

http://vbpuntonet.blogspot.mx/

Valora esta respuesta

Comentar

Textbox Actualizados en Tiempo Real

Publicado por Eduardo (2 intervenciones) el 13/02/2017 23:35:49

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged, TextBox3.TextChanged

        Qdiseño = TextBox1.Text

        Velocidad = TextBox3.Text

        diaducto = (((((Qdiseño / Velocidad) * 144) / 3.14) ^ 0.5) * 2)

        FactorFriccion = (((Qdiseño / (3.12 * (diaducto ^ 2.63))) ^ 2 * (100)) / 100)

        Anchduct = ((Pi * (DiamDuct / 2) ^ 2) / (Larcduct))

        Diameduct = (1.265 * (((Larcduct * Anchduct) ^ 3) / (Anchduct + Larcduct)) ^ 0.2)

        Velocidad2 = (Qdiseño / Pi * (0.5 * Diameduct * 0.083333) ^ 2)

        Nr = ((Diameduct * 0.083333) * Velocidad2) / ViscCine

        Factf = ((Qdiseño / (3.12 * (Diameduct ^ 2.63))) ^ 2 * (100)) / 100

        PresVeloc = ((1 / 2) * DensFlui * (Velocidad2 * 0.0166667) ^ 2) * 1.4882 * 0.00403

        Me.TextBox2.Text = TextBox2.Text & FactorFriccion

        Me.TextBox4.Text = TextBox4.Text & diaducto

        Me.TextBox7.Text = Textbox7 & Diameduct

        Me.TextBox8.Text =Textbox8 &  Flowarea

        Me.TextBox9.Text =Textbox9 &  Velocidad2

        Me.TextBox10.Text = Textbox10 & Nr

        Me.TextBox14.Text = Textbox14 & Factf

        Me.TextBox12.Text =Textbox12 &  PresVeloc

        Me.TextBox13.Text = Textbox13 & Factf

End Sub

Esto es lo que tengo en ese evento y resulta que cuando lo inicio me dice que la ecuación Qdiseño = TextBox1.Text tiene un error porque no puede convertir un string "" en un double.

No se si se tendría que realizar algo más y si se tendría que realizar algo en algún otro evento?

Valora esta respuesta

-1

Comentar

Pos: 4

Val: 605

Textbox Actualizados en Tiempo Real

Publicado por Diego (190 intervenciones) el 14/02/2017 02:44:31

Lo solucionas del siguiente modo....

Qdiseño = IIf(TextBox1.Textlenght=0, 0, textbox1.text)

Eso lo deberías hacer con cada textbox que contenga algun numero editable.
Evalua la expresion, si está vacio, lo procesa como un 0 numerico. Y no genera el error de la cadena vacia.

Saludos y +bytes.

Valora esta respuesta

Comentar

Pos: 5

Val: 481

Textbox Actualizados en Tiempo Real

Publicado por Miguel (476 intervenciones) el 13/02/2017 22:43:42

Como ya te dijeron, en el evento TextChanged de cada TextBox ejecuta tu función para procesar los datos, y no olvides usar "Try/Catch" para no tener inconvenientes (textox vacíos, valores no numéricos, etc).

Valora esta respuesta

Comentar

Pasar variable de formulario hijo a formulario padre vb 2010

Abrir y cerrar Excel desde visual basic