Red de conocimiento informático - Consumibles informáticos - Código fuente del subprograma estático

Código fuente del subprograma estático

¿privado? ¿Sub? Command1_Click()

¿Electricidad estática? ¿respuesta? ¿Como? Se aplica la variable estática "Entero".

¿Respuesta? =?¿Respuesta? ?1

Etiqueta1. ¿título? =?Etiqueta1. ¿título? ?"?"? ?Str(a)

¿Fin? Submarino

Haga clic en el botón 1, ¿el contenido de la etiqueta 1 aparecerá automáticamente como 1? ¿2? ¿Sub? Command2_Click()

¿Atenuar? ¿respuesta? ¿Como? Variables dinámicas definidas por números enteros

¿Respuesta? =?¿Respuesta? ?1

Etiqueta 2. ¿título? =?Etiqueta2. ¿título? ?"?"? ?Str(a)

¿Fin? Submarino

Haga clic en el botón 2, el contenido de la etiqueta2 se genera automáticamente como 1?1?1?1?1?1?1?1