USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  MsgBox não modal no VB 6.0. Tá dando erro!
Cid
SÃO PAULO
SP - BRASIL
Postada em 19/07/2004 11:55 hs            
Peguei a dica abaixo, aqui no fórum e usei no VB 4.0. Funcionou normalmente.
 
Estou tentando usá-la no VB 6.0 e está dando erro. (Run-time error '53': File not found: User)
 
A função MsgBox do Visual Basic não contempla esta opção. Porém, é possível fazer usando a função API MessageBox. Declare e chame a API como segue (código VB 3.0):

Declare Function MessageBox% Lib "User" (ByVal _
        hWnd%, ByVal lpText$, ByVal lpCaption$, _
        ByVal wType%)

Const MB_OKCANCEL As Long = &H1
Dim ret%
ret = MessageBox(0, "I am a Modeless MessageBox", _
      "Modeless MessageBox ", MB_OKCANCEL)
Obs.: É possível também criar um formulário com as mesmas características de um MessageBox e exibí-lo de forma não modal.

Será que é preciso fazer alguma alteração para usá-la no VB 6.0?
 
     
|-tom-|
Pontos: 2843
CATANDUVA
SP - BRASIL
Postada em 19/07/2004 13:36 hs            
Pelo que eu entendi essa funcao funciona somente na versao 3 do Vb, creio q para a versao 6 seja uma outra funcao.
 
 
OK

-------------------------------------------------------------------------------------------------------------------------------------------------------------------------

 tom -Catanduva/SP

Analista Sistemas - Visual Basic 6 - VB.NET

"Confiai perpetuamente no Senhor, porque o Senhor Deus é uma Rocha Eterna"

                                                                                              Isaías 26:4  Emoções 

 

     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página