Microsoft Visual Basic 6
Ver Más instrucciones
1
Abra Microsoft Visual Basic desde el Windows botón " Inicio".
2
Seleccione " Standard.exe " en la pestaña "Nuevo" y haga clic en el botón "Abrir" .
3
Arrastre un botón desde el cuadro de herramientas al formulario. Haga doble clic en el botón en el formulario para abrir la ventana de código
4
Insertar el código siguiente en la línea de "Private Sub Command1_Click ()" : .
ObjWMIService Dim , Proceso colProcessesDim Como StringProcess = Set " VB6.exe " objWMIService = GetObject ( " winmgmts :") Set colProcesses = objWMIService.ExecQuery ( " Select * from Win32_Process donde nombre = '" & Process & "' ") Si colProcesses.Count ThenMsgBox ( "Proceso está en marcha " ) ElseMsgBox ( " Proceso no se está ejecutando ") End If
5 Pulse el botón" F5 "para ejecutar el código en modo de depuración.
6
click en el botón " Command1 " para ejecutar el código para determinar si un proceso está en marcha. Un cuadro de mensaje aparece con el texto " proceso está en ejecución " si el proceso " VB6.exe " está en marcha.