¿Cómo haga para dividir dos TextBox sin que me salga error de coincidencia?

TextBox1.Text = CDbl(TxtCal3.Text) / CDbl(txtResultado.Text) * 100

Me sale error de '13', en tiempo de ejecución.

Nota: el resultado debe incluir número decimales.

Alguien que

1 respuesta

Respuesta
1

Hay que verificar sin los valores son números, prueba lo siguiente:

  If TxtCal3.Value <> "" And IsNumeric(TxtCal3.Value) And _
     txtResultado.Value <> "" And IsNumeric(txtResultado.Value) And txtResultado <> 0 Then
     TextBox1.Value = CDbl(TxtCal3.Value) / CDbl(txtResultado.Value) * 100
  Else
    MsgBox "Valores incorrectos"
  End If

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas