Thanks to http://social.msdn.microsoft.com
Dim p() As Process Private Sub CheckIfRunning() p = Process.GetProcessesByName("processName") If p.Count > 0 Then ' Process is running Else ' Process is not running End If End Sub
Dim p() As Process Private Sub CheckIfRunning() p = Process.GetProcessesByName("processName") If p.Count > 0 Then ' Process is running Else ' Process is not running End If End Sub
USB Plug Charger, 4-Port USB Fast Charger Plug with 33W Intelligent Quick Charge 3.0 Wall Charger, Multi USBPower Adapter UK Fast Charging...
No comments:
Post a Comment