Bgsoft de Hola (Jesús)
Gracias por tu Respuesta.
En Realidad si hablo español, es mi lengua natural, (soy de Venezuela). Razón Alguna Por, Escribo CUANDO el Mensaje aparece distorcionado Al Momento de remitirlo. SONDA Con El NumberFormat y estafa el de depuración (rápido), y sí puedo OBSERVAR Que el valor de i, Una Vez Realizado el Cálculo, de como aparece debe ser (en El Ejemplo debe Ser 10). Sin embargo, Este valor no sí ve reflejado en el edtResultado.text. A continuacion coloco Lo Que Estoy Haciendo una versión Si Puedes orientarme párr resolver el Problema.
Sub Globals
Dim editCantEnt Como EditarTexto
Dim Resultado As Double
Dim btnCalcular Como Button
Dim Variab1, Variab2, Variab3 As Double
Dim i As Double
End Sub
Sub btnCalcular_Click
i = NumberFormat2 (i, 0, 3, 3, False)
i = (0,1)
'Variab1 = 300
'Variab2 = 9000
'Variab3 = 3
Do Until (Variab1 * i) = (Variab2/Variab3)
Resultado = (Variab2 / Variab3) / (Variab1)
i = (i + 0,1)
Bucle
edtResultado.Text = Resultado
End Sub
De Cuando utilizo el de depuración (Rapid) Obtengo lo siguiente:
Valor de i: 0.1
Valor de Resultado: 10.0
Varlor de Variab1: 300.0
Varlor de Variab2: 9000.0
Valor de Variab3: 3.0
Aunque aparece el Valor de Resultado (10.0), Este No Se Refleja En El edtResultado.Text.