Visual Basic.NET - Textbox Actualizados en Tiempo Real

 
Vista:
sin imagen de perfil
Val: 5
Ha disminuido su posición en 5 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

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 claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Diego
Val: 678
Bronce
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

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 claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Hugo
Val: 96
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Textbox Actualizados en Tiempo Real

Publicado por Hugo (82 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.

1
2
3
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
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 5
Ha disminuido su posición en 5 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Textbox Actualizados en Tiempo Real

Publicado por Eduardo (2 intervenciones) el 13/02/2017 23:35:49
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
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
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
-1
Comentar
Imágen de perfil de Diego
Val: 678
Bronce
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Textbox Actualizados en Tiempo Real

Publicado por Diego (190 intervenciones) el 14/02/2017 02:44:31
Lo solucionas del siguiente modo....

1
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
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 968
Plata
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

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
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar