2011-12-19 122 views
1

劑量任何人都知道如何讓一個文本框跟隨鼠標光標在一個簡單的形式?VB.NET文本框跟隨鼠標光標

+1

這聽起來像它會是一個令人難以置信的令人討厭的用戶界面...你想解決什麼問題? – 2011-12-19 14:20:58

回答

0

在窗體的MouseMove事件處理

textBox.Location = new Point(e.X, e.Y); Invalidate(); 

eMouseEventArgs

+0

(這兩個答案都是正確的,只能勾選一個),謝謝 – 2011-12-20 07:50:45

0

我做這個代碼,請仔細檢查這個答案:

Private Sub Form1_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove 
     Label1.Text = e.X.ToString 
     Label2.Text = e.Y.ToString 
     Me.TextBox1.Location = New System.Drawing.Point(e.X + 10, e.Y + 10) 

    End Sub 
+0

有點像我想要的工作是有可能有一個微小的距離文本框,因爲我仍然可以點擊窗體上的其他東西? – 2011-12-19 14:30:18

+0

@BartvanTuÿl:是的,只需添加幾個像素到'e.X'和'e.Y'屬性。這些是當前鼠標指針位置的X和Y值。如果爲每個偏移量添加20或25像素偏移量,則控件的新位置將與鼠標指針的當前位置偏移20或25像素。 – 2011-12-19 14:38:21

+0

你真正需要的是最後一行;將其更改爲:Me.TextBox1.Location = New System.Drawing.Point(e.X + 25,e.Y + 25)' – 2011-12-19 14:38:36