Red de conocimiento informático - Problemas con los teléfonos móviles - 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!

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