deathninjak0 (11-25-2009),hopefordope (02-03-2010),L3G0 (11-28-2009),mnpeep (11-25-2009),Pixie (11-24-2009),Pixipixel_ (11-25-2009),shnarg (04-09-2010),Zoom (11-25-2009)
First add A status strip, then add a Toolstripstatuslabel1 and for its text put "processes: 0"
Then add a list view. Under the listview properties go to view then select details.
Then under listview properties go to Gridlines and select true
Now go to columns and add 5 columns they should look like this in this order
After thats done double click the form and put:
After that is done add in a button. Double click the button and put:Code:Dim Process As New Process() Dim Count As Integer = 0 ListView1.Items.Clear() For Each Process In Process.GetProcesses(My.Computer.Name) On Error Resume Next ListView1.Items.Add(Process.ProcessName) ListView1.Items(Count).SubItems.Add(FormatNumber(Math.Round(Process.PrivateMemorySize64 / 1024), 0)) ListView1.Items(Count).SubItems.Add(Process.Responding) ListView1.Items(Count).SubItems.Add(Process.StartTime.ToString.Trim) ListView1.Items(Count).SubItems.Add(Proces*****) Count += 1 Next ToolStripStatusLabel1.Text = "Processes: " & ListView1.Items.Count
^make the button text "Kill Process"^Code:For Each Process As ListViewItem In ListView1.SelectedItems System.Diagnostics.Process.GetProcessById(Process.SubItems(4).Text).Kill() Next Form1_Load(Nothing, Nothing)
Now add a timer and under the timer put:
Now debug and it should work, if you need more help PM me.Code:Form1_Load(Nothing, Nothing)
My Final Result(I added some stuff but its still basically the same):
Thanks me if i helped![]()
Last edited by Bombsaway707; 11-24-2009 at 04:53 PM.
deathninjak0 (11-25-2009),hopefordope (02-03-2010),L3G0 (11-28-2009),mnpeep (11-25-2009),Pixie (11-24-2009),Pixipixel_ (11-25-2009),shnarg (04-09-2010),Zoom (11-25-2009)
I'm going to try this now..I was trying to code something like this my self..if it works very sweet.
I've been looking every where for a task manager like this,
thanks![]()
I think there is a flaw in your code
Located in...Code:Form atNumber
and...Code:ListView1.Items(Count).SubItems.Add(Form atNumber(Math.Round(Process.PrivateMemorySize64 / 1024), 0))ListView1.Items(Count).SubItems.Add(Process.Responding)
is two different lines it should be...Code:ListView1.Items(Count).SubItems.Add(Form atNumber(Math.Round(Process.PrivateMemorySize64 / 1024), 0))ListView1.Items(Count).SubItems.Add(Process.Responding)
Code:ListView1.Items(Count).SubItems.Add(Form atNumber(Math.Round(Process.PrivateMemorySize64 / 1024), 0)) ListView1.Items(Count).SubItems.Add(Process.Responding)
is there a way to put in check boxes, and have a button that will kill the "ticked" processes?
THANK YOU THANK YOU THANK YOU THANK YOU THANK YOU THANK YOU THANK YOU THANK YOU THANK YOU THANK YOU THANK YOU THANK YOU!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
I've been looking for things to add in my multitool and THIS IS AWESOME!!! i expect it to be in 1.5 (one tool at a time)
Good job mate.
Don't be lazy, make it auto refresh.