在VB中通過鼠標拖動來移動控件

Question

在這篇文章的最終答案中，Paweł Wojda 發布了一種使用鼠標移動控件的一般方法。 但是，我在 VB 中工作並且無法翻譯他的方法，因為沒有 control.location 和 control.update 的等價物。 如何將相同的功能移植到 VB。

Answer 1

您鏈接的問題是使用 Windows Forms 項目，但是根據您最常用的標簽，我猜您使用的是 WPF。

與 WinForms 的Control.Location屬性等效的是 WPF 中的Control.Margin （特別是頂部和左側）。

在某種程度上，與Control.Update等效的是Control.InvalidateVisual 。 雖然，在這種情況下也不需要調用，所以你可以忽略它。

Answer 2

dim down as new boolean在鼠標按下事件：

Down = true

在鼠標向上事件：

Down =false

鼠標移動事件：

If down = true Then
      Me.location = cursor.position
 End if