Red de conocimiento informático - Problemas con los teléfonos móviles - Escriba un programa en VB, ingrese el año y el mes y genere el código correspondiente a la cantidad de días del mes. Es necesario utilizar mayúsculas y minúsculas para implementarlo.

Escriba un programa en VB, ingrese el año y el mes y genere el código correspondiente a la cantidad de días del mes. Es necesario utilizar mayúsculas y minúsculas para implementarlo.

¿Privado?Sub?Command1_Click()

¿Dim?miMes?As?Integer

Dim?miAño?As?Integer

miAño ?=?Val(Text1.Text)

miMes?=?Val(Text2.Text)

Texto3.Text?=?DateDiff("d",?myAño?amp; ?"-"?amp;?miMes?amp;?"-"?amp;?"1",?miAño?amp;?"-"?amp;?miMes? ?1?amp;?"-"?amp; ;?"1")

Fin?Sub

Privado?Sub?Form_Load()

Texto1.Texto?=?Año(Fecha)?'texto1 Ingresa el año en Texto2.Text?=?1?'Ingresa el mes en texto2

Ingresa el número de días correspondientes al mes en Texto3.Text?=?""?'text3

Comando1.Caption?=?"Ver"

Fin?Sub