VB.NET質問スレ (Part18)

VB.NET質問スレ (Part ..

950:デフォルトの名無しさん
07/01/08 23:48:47
>>944
馬鹿にされがちなやり方だけど愚直にタイマつかってポーリングするのが
一番簡単だと思う。エレガントでは全然ないが。

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim rect As Rectangle

With WebBrowser1
rect = .RectangleToScreen(.ClientRectangle)
If rect.Contains(Control.MousePosition) Then
.Focus()
End If
End With
End Sub

次ページ