Wpf 在VB中通过鼠标拖动控件来移动控件

在中的最后一个答案中，PawełWojda发布了一种用鼠标移动控件的通用方法。但是，我在VB中工作，无法翻译他的方法，因为没有与control.location和control.update等效的方法。如何将相同的功能移植到VB。

您链接的问题是使用Windows窗体项目，但是基于您最常用的标记，我猜您使用的是WPF

相当于WinForms的

控件。Location

属性在WPF中（特别是在顶部和左侧）

---

与

Control.Update

相当的是

Control.InvalidateVisual

。不过，在这种情况下，不需要调用任何一个，因此您可以忽略它。

将其变暗为新的布尔值。

鼠标按下事件时：

Down = true

鼠标悬停事件：

Down =false

鼠标移动事件：

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

---

这个问题是使用一个Windows窗体项目（也可以在VB.NET中使用），但是根据您最常用的标记，我猜您使用的是WPF？如果是这种情况，则与WinForms的

控件.Location

属性等价的是WPF中的（特别是顶部和左侧），而与

Update

等价的是

InvalidateVisual

（虽然在这种情况下不需要调用这两个属性，所以您可以忽略它）。作为将来的参考，Windows窗体（WinForms）是可用于创建标准、接近本机Windows应用程序的两种技术中的第一种。它基于Win32，并使用您的CPU呈现其大部分内容Windows演示基金会（WPF）是这两个系统中的第二个，它后来出现，并且是一个使用DirectX（因此GPU）来渲染它的内容的专门技术。@ VisualVINCUTING是的，我应该添加我刚才所做的“WPF”。我会试试边距。@VisualEvent如果您将第一次回复作为答案发布，我会将其标记为回答了我的问题。很高兴我能提供帮助，很抱歉回复太晚。欢迎使用Stack Overflow！您的答案仅适用于WinForms，但与标记一样，表明OP正在使用WPF。这是两种不同的GUI技术，它们只有一些相似之处。在任何一种情况下，请确保在回答之前仔细阅读整个问题，因为OP明确指出，

Control.Location

（与

Me.Location

）相同的属性不存在。非常感谢。