Ir para conteúdo
Fórum Script Brasil
  • 0

Erro


PedroBarreto

Pergunta

Galera olhem isso:

Private Sub Command1_Click()

addcaminhao = InputBox("Insira a Placa do Novo Caminhao", "Adicionar")

If addcaminhao = "" Or Len(addcaminhao) < 6 Then

MsgBox ("Não Foi Inserido Uma Placa Valida")

Else

Data1.Recordset.AddNew

Text1.Text = addcaminhao

MsgBox("Note que você acaba de gerar um novo caminhao no sistema, porém falta detalhes de seus pneus, clique em um pneu, depois em 'Adcionar Dados Desse Pneu', logo após complete os dados e clique em OK.", "Atenção")

End If

End Sub

quando eu clico no botao aparece o inputbox certinho, porem quando do ok aparece um erro na linha: MsgBox("Note que você acaba de gerar um novo caminhao no sistema, porém falta detalhes de seus pneus, clique em um pneu, depois em 'Adcionar Dados Desse Pneu', logo após complete os dados e clique em OK.", "Atenção"), dizendo: 'COMPILE ERROR: EXPECTED: ='.

Porque?

Obrigado!

Link para o comentário
Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

  • 0

Porque só se usa () no VB6 quando se quer retornar algo (ou quando se quer passar *um* parâmetro por valor, sem que o mesmo o seja). Sua linha deveria ser:

MsgBox "Note que você acaba de gerar um novo caminhao no sistema, porém falta detalhes de seus pneus, clique em um pneu, depois em 'Adcionar Dados Desse Pneu', logo após complete os dados e clique em OK.", "Atenção"
E a linha...
MsgBox ("Não Foi Inserido Uma Placa Valida")

... funciona porque só tem um parâmetro (como eu disse no primeiro parágrafo), porém ele está sendo passado por valor.

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,4k
×
×
  • Criar Novo...