```vb

Private Sub MoveLabelToRight()

' 获取窗体的宽度

Dim FormWidth As Integer = Me.Width

' 获取Label的宽度

Dim LabelWidth As Integer = Label1.Width

' 计算Label应该放置的左边缘位置

Dim NewLeft As Integer = FormWidth - LabelWidth

' 设置Label的新位置

Label1.Left = NewLeft

End Sub

```

这段代码首先获取当前窗体的宽度和Label控件自身的宽度，然后通过从窗体宽度中减去Label宽度得到Label应该放置的左边缘位置。最后，它将这个新计算出的位置赋值给Label的`Left`属性，从而实现了将Label移动到窗体最右侧的效果。

为了确保这种操作在窗体大小改变时仍然有效，你可以在窗体的Resize事件中调用上述方法：

```vb

Private Sub Form1_Resize(sender As Object, e As EventArgs) Handles MyBase.Resize

Call MoveLabelToRight()

End Sub

```

这样，无论用户如何调整窗体大小，Label都会自动调整到窗体的最右侧边缘。通过这种方式，你可以轻松地控制界面元素的位置，使其适应不同的窗口尺寸，提升用户体验。