Foro de elhacker.net

Quiero hacer una simple suma uso un tres cajas de texto, las que estan en el código, pero me da error, no entinedo cual es la razón.

Private Sub cmdResta_Click(Index As Integer)
txtResultado.Text = Val(txtOp1.Text) - Val(txtOp2.Text)
lblOperador.Caption = "-"
End Sub

ayuda, saludos!!!

tienes tiempo en el foro deberías saber que la frase


debería seguir de una descripción del error, si es del compilador pegado entre etiquetas code o si no, una captura de pantalla... si el error no está allí no podríamos adivinar donde lo tienes

No se mucho de  VB, pero puedes probar esto:

Private Sub Suma()
    Dim num1, num2, resultado As Integer
    num1 = Val(TxtNum1.Text)
    num2 = Val(TxtNum2.Text)
    resultado = Val(TxtNum1.Text) + Val(TxtNum2.Text)
    TxtResultado.Text = resultado
End Sub

Saludos.

Me aparece una ventanita que dice

ok... según el error te pregunto...

estás seguro que escribiste los nombres de manera exacta?

txtResultado
txtOp1
txtOp2
lblOperador
cmdResta_Click

el programa se detiene en alguna de esas lineas?

Si, todo esta escrito correctamente:

Esta linea: lblOperador.Caption = "-" esta bien

El problema esta en la operación, me marca sombreado el .Text de de txtOp1

la operación, siempre y cuando ingreses valores númericos está bien, por lo que es casi seguro que tienes mal escrito el nombre de los textbox, revisa que los txt tengan realmente el nombre que le estás asignando en la operación.

Si efectivamente, estan bien hecho el problema fue que había copiado y pegado las textbox.

Gracias!!!

Saludos