Conversión de QBASIC a VISUAL BASIC
Publicado por Claudio (1 intervención) el 18/07/2021 00:52:01
Hola , Convertí un programa de procesamiento térmico de QBasic a Visual Basic, el programa lee dos archivos externos .DAT que los llama desde código, arroja resultados erroneos.no se que estoy haciendo mal declare variables para hacerlo funcionar con visual basic.
Arroja un "error 11 Division por cero", porque no toma valores en el divisor no se llenan las variables, no se que converti mal en este punto se me complicó.
Los anteriores los resultados que me devuelve el programa están bien. estas líneas empieza el fallo :
1545 G9 = (G(L, 0)) - G(L - 1, 0) / (G(L, K) - G(L - 1, K))
1550 FU = (G(L - 1, 0)) + G9 * (G5 - G(L - 1, K))
igualmente les paso el código completo, este código lo corro en un archivo excel y lo pruebo en la ventana inmediato para evaluar los resultados del código
lo correcto sería así: en la imagen estan todos los resultados que deberia obtener solo me faltan estos dos:
fh/u:6.926389
F(121.1111,10)=5.10404 min
perdon pero la explicacion es larga!!!! un Saludo y Muchas Gracias
Arroja un "error 11 Division por cero", porque no toma valores en el divisor no se llenan las variables, no se que converti mal en este punto se me complicó.
Los anteriores los resultados que me devuelve el programa están bien. estas líneas empieza el fallo :
1545 G9 = (G(L, 0)) - G(L - 1, 0) / (G(L, K) - G(L - 1, K))
1550 FU = (G(L - 1, 0)) + G9 * (G5 - G(L - 1, K))
igualmente les paso el código completo, este código lo corro en un archivo excel y lo pruebo en la ventana inmediato para evaluar los resultados del código
lo correcto sería así: en la imagen estan todos los resultados que deberia obtener solo me faltan estos dos:
fh/u:6.926389
F(121.1111,10)=5.10404 min
perdon pero la explicacion es larga!!!! un Saludo y Muchas Gracias
- Archivos.rar(4,1 KB)
Valora esta pregunta
0