Al utilizar VB para crear un calendario perpetuo, debe ingresar la fecha para obtener los términos solares de los signos del zodíaco los domingos y feriados.

Otro calendario lunar trata de hacerlo mejor.

Utilice printf para imprimir el directorio de funciones, cambiar y llamar a subfunciones varias veces y agregar un bucle grande.

La visualización del calendario es relativamente sencilla, pero basta con calcular si el primer día del año es una semana.

Principio: Lunes, año 1, enero, calcular el AD del primer día de este día, año 1, enero, dividir por la mitad de 7, y el resto es la semana. Hay 365 días en un año y 364 es múltiplo de 7, por lo que hay un día adicional cada año y se agrega un día en los años bisiestos. Hay uno más sencillo, sólo 400 años es una reencarnación, 4097 = más de 497.

El año que ingresas se divide por 400, y luego el monto del cálculo para los días restantes del año será mucho menor.

Así que el primer día de este año es el domingo.

Es mejor crear una subfunción para implementar esta función. El valor de retorno es el primer día de la semana de este año, que se puede utilizar para

La siguiente subfunción de impresión. -La función es una buena opción.

Configure una matriz global que contenga el número de días de un mes para determinar si el número de días de febrero BR />Aquí hay un truco: configurar una variable para contener el último día de cada mes y la semana. Debido a que es continuo, el día de la semana en el que cae el primer día del mes siguiente está bien definido. Simplemente imprima algunos espacios para generar el valor de esta variable. Vaya.

Hay algunas cosas buenas acerca de la semana de las citas. Conociendo la fecha del primer día del año, luego la fecha del primer día de la semana, la diferencia este año son unos días hermosos. Usando un bucle for puedes calcular.

Si el calendario lunar no es bueno, puede consultar Baidu. Hay subfunciones, puede consultar a & gt

Las dos últimas funciones, lectura y escritura de archivos. , son muy simples y tienen un formato fijo. El archivo no ha cambiado mucho.