已经获得另一程序的TAB控件句柄,VB如何控制该TAB控件切换标签页???
以下是我的代码,为什么没反应呢??
我的意思是打开pcAnywhere程序,以下已经取得了TabControl句柄,键盘按下CTRL+TAB可以切换TAB控件标签页的,我使用SendKeys "^{TAB}", True却毫无反应,什么原因呢???
还有已经取得句柄的话,不采用SendKeys 方法,如何使用其他办法来解决呢???
Private Sub Command1_Click()
Shell "C:\Program Files\Symantec\pcAnywhere\winaw32.exe", vbNormalFocusDim hwn As Longhwn = FindWindow(vbNullString, "pcAnywhere 管理器")
Label1.Caption = "[pcAnywhere 管理器] 窗口句柄为 " & hwnSendKeys "{HOME}", True '发送键盘HOME 使得添加主控端获得焦点
SendKeys "{ENTER}", True '发送键盘ENTERhwn = FindWindow(vbNullString, "pcAnywhere 主控端 属性: 新主控端")
Label2.Caption = "[pcAnywhere 主控端 属性: 新主控端] 窗口句柄为 " & hwnDim hwn0 As Long
hwn0 = FindWindowEx(hwn, 0&, "SysTabControl32", "")
Label3.Caption = "TabControl句柄为 " & hwn0SendKeys "^{TAB}", True
end  sub