Visual Basic - Ayuda Urgente

HOLA ....UN FAVOR LA PERSONA QUE ME AYUDO A RESOLVER MI PROBLEMA DE IMPRESION EN BASIC, PODIA PROPORCIONARME ALGUN CORREO PARA QUE LE PUDIERA MANDAR UNA IMAGEN DE MI PROGRAMA, YA QUE EN BASE A ESE PROGRAMA ESTOY CALCULANDO LA LA TRAYECTORIA SOLAR DE ALGUNAS CIUDADES, TENGO UN PROBLEMA EN CUANTO A UN DECIMAL EN EL CALCULO DE MIS DATOS......

OJALA PUDIERA CONTAR CON SU AYUDA.............

YA QUE POR ESTE MEDIO NO PUDE AGREGAR LA IMAGEN..........

nuevo-at-nuevo-punto-com SOLO RECIBI RESPUESTA DE ESTE NOMBRE Y QUISIERA VER SI ME PODRIA SEGUIR AYUDANDO....

GRACIAS POR LE APOYO............

el problema que tengo es el siguiente :

tengo este codigo :

alt_sol = (Cos(latitudes * pi / 180) * Cos(decli_sol * pi / 180) * Cos(0 * pi / 180))
alt_sol = alt_sol + (Sin(latitudes * pi / 180) * Sin(decli_sol * pi / 180))
alt_sol = Atn(alt_sol / Sqr(-alt_sol * alt_sol + 1))
alt_sol1 = alt_sol * 180 / pi

azimut = Str(Cos(decli_sol * pi / 180) * Sin(0 * pi / 180))
azimut = azimut / Cos(alt_sol1 * pi / 180)
azimut = Atn(azimut / Sqr(-azimut * azimut + 1))
azimut = azimut * (180 / pi)
azi12 = Str(azimut)


longitud = 2 / Tan(alt_sol1 * pi / 180)
som12 = Str(longitud)

EL ULTIMO VALOR ASIGNADO AL TEXT BOX (som12) ES UNA LONGITUD DE SOMBRA QUE ESTOY ANALIZANDO PARA UNA TESIS SOBRE GEOMETRIA SOLAR EN LA CARRERA DE ARQUITECTURA.... ESTA SOMBRA LA CALCULO PARA LAS 7,8,9,10,11, Y 12 DEL DIA.... EL PROBLEMA ES QUE A LAS SIETE DE LA MAÑANA ES UNA LONGITUD Y CONFORME VA PASANDO EN TIEMPO ESA LONGITUD SE VA HACIENDO MENOR EN VALOR.. CON ESTOS VALORES OBTENIDOS GENERO UNA GRAFICA... EL PROBLEMA QUE TENGO ES QUE CUANDO LLEGA A LAS 12 EL VALOR SE VUELVE POR EJEMPLO: 0.0086.... Y EN LUGAR DE PONER ESE NUMERO ME PONE 8.60000 QUE ES EQUIVALENTE PERO ESTA ELEVADO A 10 A LA MENOS 3... Y DESEO QUE ME PONGA EL VALOR TAL CUAL, YA QUE LA GRAFICA RECONOCE 8.6 Y NO EL 0.0086 Y OBTENGO RESULTADOS ERRONEOS PARA GENERAR LA GRAFICA.... ESPERO TENER RESPUSTAS Y AYUDA PRONTO....

ESTE ES EL CODIGO SOLO PARA LAS 12, PERO A LAS 11, 10, 9, 8 Y 7 SE REPITE LO MISMO.. PERO EL PROBLEMA SE ME PRESENTA A LAS 12 DEL DIA CUANDO EL VALOR ES MUY PEQUEÑO...

asi se habla, o mejor asi se escribe.
que se enteren estos pendejetes k lo k quieren es k les hagamos los deberes en ves de investigar