Red de conocimiento informático - Material del sitio web - Cree una matriz de control de 10 filas y 10 columnas que consta de 100 botones de comando en el formulario (programación vb)

Cree una matriz de control de 10 filas y 10 columnas que consta de 100 botones de comando en el formulario (programación vb)

¡20QB! '''''''''' 'Primero cargue un control, y luego, basándose en este control, cargue la matriz de controles uno por uno hasta completar, cambiando la posición relativa de un control cada 10 controles...

¿Opción?Explícito

¿Privado?Sub?Form_Load()

Comando1(0).Ancho?=?1000

Comando1(0).Alto ?= ?500 Dim?I?As?Long For?I?=?1?A?119 Cargar?Comando1(I) Comando1(I).Ancho?=?1000 Comando1(I).Alto?=?500 Si? ¿I?Mod?10?=?0?Entonces

Comando1(I).Left?=?Command1(I?-?1).Left?+?1100

Command1( I) .Top?=?Command1(0).Top De lo contrario

Command1(I).Left?=?Command1(I)-?1).Left

Command1(I ). ¿Arriba?=?Comando1(I)-?1).Arriba?+?550 ¿Fin?Si Comando1(I).Caption?=?I Comando1(I).Comando1(I).Visible?=?Verdadero Comando1(). I) .¿Habilitado?=?Verdadero Siguiente

¿Fin?