Configuración de clase de VB, pero no tengo idea de lo que significan estos códigos. Elegí el juego de rompecabezas numérico. ¡Espero que alguien pueda ayudarme a explicarlo!
Seleccione Case Index 'Seleccione declaración, aquí seleccione según diferentes valores de ÍNDICE
Caso 0 'Cuando el índice es 0
If Com(Index 1).Visible = False Then 'If Com (Index 1).Visible = True 'Entonces com1 se vuelve visible
Com(Index 1).Caption = Com(Index).Caption 'El título de com1 se convierte en el título de com0
Com(Index).Visible = False'com0 se vuelve invisible
Com(Index).Caption = "" 'el nombre de com0 se vuelve vacío
Else
Si Com(Index 3).Visible = False Entonces 'Si COM(INDEX 3) no es visible
Com(Index 3).Visible = True 'Entonces COM(INDEX 3) se vuelve visible
Com(Index 3).Caption = Com(Index).Caption 'Asigna el título de COM(INDEX) a COM(INDEX 3)
Com(Index).Visible = False 'COM(INDEX ) se vuelve invisible
Com(Index).Caption = "" 'El título de COM(INDEX) se vuelve vacío
End If
End If
Caso 1 ' Cuando el índice es 1