¿Cómo diseñar un programa de facturación de teléfonos públicos utilizando el programa VB? ¡Quiero pasos!

a=inputbox("Ingrese la hora", "Preguntar")

if a="" luego salga de sub

b=iif(alt; 3 , 0.5, (a-3)*0.15 0.5)

si hora(hora)lt; 7 u hora(hora)gt 19 entonces b=b/2

msgbox; " La tarifa de llamada es: "amp;