tvinga enda instans läge i ett Visual Basic 6.0 ( VB6 ) program är viktigt när en andra instans av programmet kommer att orsaka oönskade effekter, såsom att utföra åtgärder dubbelt eller orsakar fel som båda fallen försöker komma åt en enda resurs . I Visual Basic . NET ( VB.NET ) finns det en " Gör enda instans ansökan " alternativet , men i VB6 du måste manuellt kontrollera eventuella tidigare instanser som körs när du startar programmet genom att använda " App.PrevInstance " metoden och sedan stänga av programmet . Instruktioner
1
Öppna VB6 källfilen i Microsoft Visual Basic 6.0 .
2
Kontrollera om en annan instans av programmet redan är igång med genom att lägga till följande kod i fungera programmet startar med , som vanligtvis är " Sub Main" :
p Om App.PrevInstance = sant då Addera 3
Visa en MsgBox som informerar användaren om att en instans av programmet redan körs och stänga programmet genom att lägga till följande kod efter " Om " uttalande :
MsgBox " program som redan körs ... "
End
End If
p Om funktionen laddar en form innan " if-else " , som ditt program börjar i " Sub Form_Load ( ) " , lägg sedan till " Ladda ur mig " innan " End " -kommandot .
4
Spara VB6 fil , kompilera och köra programmet för att aktivera den enda instans koden .