用可timer控件之后程序有点卡,怎么办........

就是更新进程信息.....再跟新的时候有点卡.....有没有什么办法呀

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Me.ListView1.Items.Clear()
Dim myprecess As Process() = Process.GetProcesses
Dim thisprocess As Process
For Each thisprocess In myprecess
Dim mylistviewitem As New ListViewItem
Try
mylistviewitem.Text = thisprocess.ProcessName
mylistviewitem.SubItems.Add(thisprocess.Modules(0).FileName)
mylistviewitem.SubItems.Add(thisprocess.WorkingSet64)
mylistviewitem.SubItems.Add(thisprocess.PriorityClass)
ListView1.Items.Add(mylistviewitem)
Catch ex As Exception
End Try
Next
End Sub

能不能说下为什么要这样子...先谢过了....

知道为什么了,不过还是很卡....

偶怎么没问题~~~~

谁学过汇编~