Question

vb中如何判断获得焦点

例如 我写了个程序 我想获得QQ聊天时的文本筐的焦点
或者可以判断出是否获的了焦点
只要是有关键字的地方就屏蔽，不关在什么地方
怎么样才能实现？？

Answer 1

我怎么判断一个单选框失去焦点?求教高手，小弟先行谢过
Private
Option_Focus_Status
As
Boolean
Private
Sub
Option1_GotFocus()
Option_Focus_Status
=

Answer 2

Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowNullClassName Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As Integer, ByVal lpWindowName As String) As Long
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
发送数据
Private Declare Function SendInput Lib "user32.dll" (ByVal nInputs As Long, pInputs As GENERALINPUT, ByVal cbSize As Long) As Long
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (pDst As Any, pSrc As Any, ByVal ByteLen As Long)

Private Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long

用api.首先查找到你所要操作的窗体，获得焦点。

Answer 3

这个得用API

我 觉得你就是想要当前窗体吧

你看看下面的网页