Senin, 24 Juni 2013
Cara membuat Task Manager dengan menggunakan Microsoft
Visual Basic.
Anda dapat mendownload Microsoft Visual Basic dengan
mengklik: Microsoft
Visual Basic
Berikut ini cara membuatnya:
1. Buka program Microsoft Visual Basic dan buat project
baru.
2. Tambahkan ListBox dan setting:
- Name : ListBox1
3. Tambahkan Button dan setting:
- Name : Button1
- Text : Refresh
4. Tambahkan Button dan setting:
- Name : Button2
- Text : Delete
- Text : Delete
5. Copy dan masukkan scrip ini:
Imports System.IO
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
GetProcesses()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
KillProcess()
End Sub
Public Sub GetProcesses()
ListBox1.Items.Clear()
For Each p In Process.GetProcesses
ListBox1.Items.Add(p.ProcessName)
Next
End Sub
Public Sub KillProcess()
Try
Dim p As Process
For Each p In Process.GetProcesses
If p.ProcessName = ListBox1.SelectedItem Then
p.Kill()
End If
Next
GetProcesses()
Catch ex As Exception
MsgBox("Process Kill Failed", MsgBoxStyle.Critical)
End Try
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
GetProcesses()
End Sub
Private Sub TabPage1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
GetProcesses()
ListBox1.Items.Clear()
For Each p In Process.GetProcesses
ListBox1.Items.Add(p.TotalProcessorTime)
Next
End Sub
End Class
6. Simpan dan jalankan.
Anda dapat Mendownload Task Manager dengan
mengklik link dibawah ini:
Password: Julius Danes Nugroho
