Como usar MsgBox no Visual Basic 6

Adicionar um MsgBox no Visual Basic 6 ou VB6, ele permite que você use uma caixa pop-up para os usuários com uma mensagem e botões como

Passo 1

Abra o arquivo de código-fonte do Visual Basic em um editor.

Passo 2

Declare uma variável para armazenar os valores de retorno de MsgBox adicionando o código "msgvalue As Integer".

Passo 3

Crie um MsgBox adicionando o código "msgvalue = MsgBox (" Clique em OK ou Cancelar ", vbOkCancel, " Message Box Title ")". Isso fará com que uma caixa de diálogo MsgBox com "OK" e "Cancelar" botões, com o título "Título da caixa de mensagem" e a mensagem "Clique em OK ou Cancelar". Outras opções de botões, além do vkOkCancel, são vbOkOnly, vbAbortRetryIgnore, vbYesNoCancel, vbYesNo e vbRetryCancel.

Passo 4

Manipule o código a ser executado de acordo com o botão no qual o usuário clica, adicionando o código "If msgvalue = 1 Then", "Display.Caption =" Clicked OK "", "Else", "Display.Caption =" Clicked Cancelar "" e "End If". Os valores dos botões são numerados de 1 a 7 para os botões OK, Cancelar, Cancelar, Repetir, Pular, Sim e Não.

Passo 5

Salve o arquivo do Visual Basic.