有没有办法锁定外部进程的输入焦点? 比如我在自己的程序里通过控制面板调用了打印机安装向导,需要等待向导设置完毕。在设置过程中有没有办法保证输入焦点锁定在安装向导而不会切换会调用程序?注:通过FindWindow和SetWindowPos可以把向导放置在最前端,但是无法保证输入焦点。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用Timer解决了。 有没有效率更好的方法?Private Sub Timer1_Timer() If Not PrinterSetUpOn Then Exit Sub Dim WinHwnd As Long WinHwnd = FindWindow("#32770", "添加打印机向导") If WinHwnd = 0 Then PrinterSetUpOn = False Timer1.Enabled = False FrmMain.Enabled = True FrmMain.SetFocus Exit Sub Else BringWindowToTop WinHwnd FrmMain.Enabled = False End IfEnd Sub vb 后台方向鍵控制問題 VB6.0读写ini文件的问题 控件位置的摆放 求助呀! 请问IconCool Editor V3.0 Build 20418的注册码? datagrid问题 求教,如何在VB中根据16进制的颜色值得到该颜色的RGB值? 全屏 VB6如何获取EXE文件的版本信息 请问在里怎样检测串行口是否一占用,(注:不用mscomm.portopen属性) 怎么样用ADO连接加了密码的ACCESS ◆怎样读出datagrid其中一列的全部数据?请进◆
Private Sub Timer1_Timer()
If Not PrinterSetUpOn Then Exit Sub
Dim WinHwnd As Long
WinHwnd = FindWindow("#32770", "添加打印机向导")
If WinHwnd = 0 Then
PrinterSetUpOn = False
Timer1.Enabled = False
FrmMain.Enabled = True
FrmMain.SetFocus
Exit Sub
Else
BringWindowToTop WinHwnd
FrmMain.Enabled = False
End IfEnd Sub