Boa tarde. Criei um formulário com caixas de verificação que me respondem "Vaga" ou "Ocupada", mas quando eu inicio o formulário elas aparecem todas em branco, como fixar todas "vagas" quando eu inicializar o formulário? Obrigado.
Meu código esta assim:
Private Sub Verificação2_Click()
If Me.Verificação2 = -1 Then
Me.Texto22.Value = "Ocupada"
Else: Texto22.Value = "Vaga"
End If
End Sub
Meu código esta assim:
Private Sub Verificação2_Click()
If Me.Verificação2 = -1 Then
Me.Texto22.Value = "Ocupada"
Else: Texto22.Value = "Vaga"
End If
End Sub
Última edição por Rasec em 9/1/2016, 16:34, editado 1 vez(es)