VB,获取某一进程的窗体的名称及XX值,我记得VB哪个程序可以查询窗体的信息的??
3个回答
展开全部
Dim oShellApp, oShellAppWindows, oWin
Dim url As String
oShellApp = CreateObject("Shell.Application")
oShellAppWindows = oShellApp.Windows
For Each oWin In oShellAppWindows
TextBox3.Text = oWin.Document.GetType.Name
If oWin.Document.GetType.Name = "HTMLDocumentClass" And _
InStr(1, oWin.LocationName.ToString, "IDC运营支撑平台-流程管理模块", vbTextCompare) > 0 Then
url = oWin.LocationURL
End If
Next
这段是比对网页名称,你可以尝试改下,应该类似
Dim url As String
oShellApp = CreateObject("Shell.Application")
oShellAppWindows = oShellApp.Windows
For Each oWin In oShellAppWindows
TextBox3.Text = oWin.Document.GetType.Name
If oWin.Document.GetType.Name = "HTMLDocumentClass" And _
InStr(1, oWin.LocationName.ToString, "IDC运营支撑平台-流程管理模块", vbTextCompare) > 0 Then
url = oWin.LocationURL
End If
Next
这段是比对网页名称,你可以尝试改下,应该类似
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询