VB.net使用箭头键移动子窗体内的picturebox

我有一个窗体，它是主窗体面板的子窗体。这个子窗体中有一个图片框，我想使用上/下箭头键移动它。 我尝试了以下代码：

Private Sub Form1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
    Select Case e.KeyCode
        Case Keys.Up
            If PictureBox1.Top > Me.Top Then
                Me.PictureBox1.Top -= 1
            End If
        Case Keys.Down
            If PictureBox1.Bottom < Me.Bottom Then
                Me.PictureBox1.Top += 1
            End If
    End Select
End Sub

---

这样做的变通方法是什么？任何人都可以帮忙。

为什么在

面板中有一个表单？
Dim winForm As New Form2
winForm.Parent = Me.PnlMain