sábado, 9 de fevereiro de 2013

on



Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim processos As Process

        For Each processos In Process.GetProcesses
            ListBox1.Items.Add("ID: " & processos.Id & " / Nome: " & processos.ProcessName & " / Esta funcionando? " & processos.Responding)
        Next
    End Sub
End Class

Espero ter ajudado... Até mais, abraços!

0 comentários:

Postar um comentário