重慶分公司,新征程啟航
為企業提供網站建設、域名注冊、服務器等服務
為企業提供網站建設、域名注冊、服務器等服務
Process.GetProcessesByName("進程名")‘不帶擴展名
網站建設公司,為您提供網站建設,網站制作,網頁設計及定制網站建設服務,專注于成都定制網頁設計,高端網頁制作,對白烏魚等多個行業擁有豐富的網站建設經驗的網站建設公司。專業網站設計,網站優化推廣哪家好,專業網站推廣優化,H5建站,響應式網站。
找不到 就是沒有在運行,但不知道能不能判斷已暫停狀態。
private void MyPrintPage(object sender, System.Drawing.Printing.PrintPageEventArgs e)
public static boolean isNumeric(String str){
if(str.matches("http://d*"){
return true;
}else{
return false;
}
}
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim a As String
a = Microsoft.VisualBasic.Command 'a是發送給程序的命令
End Sub
End Class
使用wmi
類“Win32_Processor”中LoadPercentage屬性為當前的cpu使用率
示例代碼: Private Sub Timer1_Timer()
Dim WMI服務 As Object
Dim 對象 As Object
Dim 子對象 As Object
Dim 電腦名 As String
Dim 刷新 As Long
刷新 = 0
電腦名 = "." '表示本地計算機
Set WMI服務 = GetObject("winmgmts://" 電腦名 "/root/cimv2")
Set 對象 = WMI服務.InstancesOf("Win32_Processor")
Me.CurrentX = 0
Me.CurrentY = 0
For Each 子對象 In 對象
If 刷新 = 0 Then
刷新 = 1
Me.Cls
End If
Me.Print 子對象.Name "[" 子對象.CurrentClockSpeed "Hz] 使用率:" _
子對象.LoadPercentage "%"
Next
End Sub
FindWindowEx
VB聲明
Declare Function FindWindowEx Lib "user32" Alias
"FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As
String, ByVal lpsz2 As String) As Long
說明
在窗口列表中尋找與指定條件相符的第一個子窗口
返回值
Long,找到的窗口的句柄。如未找到相符窗口,則返回零。會設置GetLastError
參數表
參數
類型及說明
hWnd1
Long,在其中查找子的父窗口。如設為零,表示使用桌面窗口(通常說的頂級窗口都被認為是桌面的子窗口,所以也會對它們進行查找)
hWnd2
Long,從這個窗口后開始查找。這樣便可利用對FindWindowEx的多次調用找到符合條件的所有子窗口。如設為零,表示從第一個子窗口開始搜索
lpsz1
String,欲搜索的類名。零表示忽略
lpsz2
String,欲搜索的類名。零表示忽略