Private Sub Command1_Click()
End
End Sub
End
End Sub
Private Sub Label2_Click()
Label1.Caption = "MONITOR"
Label1.Caption = "MONITOR"
End Sub
Private Sub Label3_Click()
Label1.Caption = "TORRE"
Label1.Caption = "TORRE"
End Sub
Private Sub Label4_Click()
Label1.Caption = "TECLADO"
Label1.Caption = "TECLADO"
End Sub
Private Sub Label5_Click()
Label1.Caption = "MOUSE O RATON"
Label1.Caption = "MOUSE O RATON"
End Sub


No hay comentarios:
Publicar un comentario