0 Usuarios y 1 Visitante están viendo este tema.
Codigo:Private Sub Check1_Click() If Check1.Value = 0 Then VScroll1.Enabled = False Text1.Enabled = False Else VScroll1.Enabled = True Text1.Enabled = True End IfEnd SubPrivate Sub Form_Load() Check1.Value = 1End Sub