Possuo um formulário de cadastro com listbox que representa a cidade da pessoa cadastrada.
Porém, gostaria que o cadastro não fosse concluído se a alguma opção em "Cidade" não fosse escolhida.
Esta parte do código, para mim, ficaria como no código abaixo. Mas a macro do botão OK ignora esta função e corre normalmente (mesmo sem um termo escolhido no listbox) .
Alguém sabe onde estou errando?
PrivateSub btnOK_Click()
If ListBox_Cidade = ""Then
MsgBox "Cidade não escolhida. Escolha a cidade e conclua o cadastro"ExitSubElseEndIf
Private Sub btnOK_Click()
If ListBox_Cidade.ListIndex = -1 Then
MsgBox "Cidade não escolhida. Escolha a cidade e conclua o cadastro"Exit Sub
ElseEndIfEnd Sub
jose
Marcado como RespostaF.meyersexta-feira, 25 de março de 2011 18:24