Problema de conversión de funciones trigonométricas VB
Método 1;
Un método conveniente y factible es establecer una variable en su programa para almacenar el valor en radianes correspondiente a cada grado:
Dim
Disco duro
Tan
Dos bueno
Dim
Inhibidor del proteasoma
Como
Dos veces
Inhibidor del proteasoma
=
3.14159265358979
Base de almacenamiento
Disco duro
p >=
Inhibidor del proteasoma
/
180
Almacenar el valor en radianes correspondiente a cada grado
Imprimir
Seno (30 *HD) 48 Coseno (46 *HD) 7
Método 2:
Escribe tu propia función: Por ejemplo:
Privado
Función
Mi corazón (byval
Enfoque
Me gusta
Doble )
Me gusta
Dos veces
Mixin
=
Sin (grado de enfoque* 3.14159265358979/180)
Fin
Función
Entonces puedes usar directamente: MySIN(30) para encontrar el valor del seno de un ángulo de 30 grados.