Ir ao conteúdo
  • Cadastre-se

Visual Basic Resolver mensagem de erro de sintaxe VBA Access


Posts recomendados

Estou iniciando em programação e resolvi começar por um curso básico em VBA.  Estou com um "pequeno problema. Por quê quando mando executar (F8) o procedimento a seguir dá uma mensagem de erro de sintaxe? Obrigado.

Type typContato

    nomeCompleto As String * 20
    dataNascimento As Date
    fone As String * 12
    email As String * 20
    
End Type

Public arrContato(1 To 10) As typContato
Public intUltimoContato As Integer

Sub menuAgenda()

    Dim varOpcao As Variant
    
    varOpcao = inputBox ("Informe a opção desejada:" & vbCrLf & _
                        vbLf & _
                        " [ 1 ] Incluir Novo Contato" & vbCrLf & _
                        " [ 2 ] Exibir Contato" & vbCrLf & _
                        " [ 3 ] Editar Contato" & vbCrLf & _
                        " [ 4 ] Excluir Contato" & vbCrLf & _
                        " [ 5 ] Salvar Agenda" & vbCrLf & _
                        vbLf & _
                        " [ 6 ] Sair"
                        , "Agenda de Contatos")
End Sub

Link para o comentário
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisa ser um usuário para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...