フォーカスを持つウィンドウハンドルを取得
Declare Function GetFocus Lib "user32.dll" () As Long
正常終了のとき フォーカスを持つウィンドウハンドル エラーのとき 0
