Hvordan sjekke om en prosess i Visual Basic

Microsoft Visual Basic er et kraftig programmeringsspråk ennå er enkel å bruke. Ulike funksjoner og funksjonalitet er tilgjengelig for å bygge mange forskjellige applikasjoner. Når den innebygde funksjoner i Visual Basic er ikke tilstrekkelig til å utføre de nødvendige oppgavene andre Windows-komponenter kan innarbeides. WMI eller Windows Management Interface er en slik komponent som lar mange funksjoner knyttet til operativsystemet Windows. Kombinasjonen av Visual Basic og WMI er et kraftig våpen for alle utviklere å lage programmer for å manipulere operativsystemet Windows.

Bruksanvisning

1 Åpne Microsoft Visual Basic fra "Start" -knappen i Windows.

2 Velg "Standard.EXE" under "Ny" og klikk "Åpne" knappen.

3 Dra en knapp fra verktøyet boksen på skjemaet. Dobbeltklikk på knappen på skjemaet for å åpne kodevinduet.

4 Sett inn følgende kode under linjen "Private Sub Command1_Click ()":

Dim objWMIService, colProcesses

Dim Process As String
Process = "VB6.exe"
Set objWMIService = GetObject("winmgmts:")
Set colProcesses = objWMIService.ExecQuery("Select * from Win32_Process where name='" & Process & "'")
If colProcesses.Count Then
MsgBox ("Process is Running")
Else
MsgBox ("Process is Not Running")
End If

5 Trykk på "F5" for å kjøre koden i debug-modus.

6 Klikk på knappen merket "Command1" å utføre koden for å avgjøre om en prosess er i gang. En meldingsboks vises med teksten "prosessen kjører" hvis prosessen "VB6.exe" er i gang.