Forçar modo de instância única de um programa Visual Basic 6.0 ( VB6 ) é importante quando uma segunda instância do programa irá causar efeitos indesejáveis ​​, tais como a realização de ações ou duas vezes causando erros como as duas instâncias tentar acesso um único recurso . No Visual Basic. NET ( VB.NET ), há uma opção "Make aplicação única instância " , no entanto, em VB6 você tem que checar manualmente por todas as instâncias anteriormente em execução quando você iniciar o programa usando o método " App.PrevInstance " e em seguida, desligue o programa. Instruções
1

Abra o arquivo de origem VB6 no Microsoft Visual Basic 6.0.
2

Verifique se outra instância do aplicativo já está sendo executado por adicionando o seguinte código no funcionar o programa inicia-se com , o que geralmente é " Sub Main " :

Se App.PrevInstance = True Then
3

Exibir uma MsgBox que informa ao usuário que uma instância do aplicativo já está em execução e feche o programa , adicionando o seguinte código após a instrução "if" :

MsgBox " programa já em execução ... "

Fim

End If

Se a função carrega um formulário antes de o " if-else " , como o seu programa a partir de "Sub Form_Load () " , em seguida, adicione " Unload Me " antes do comando "End" .

4

Salve o arquivo VB6, compilar e executar o programa para permitir que o código de instância única.