在VB中如何让标签用时间控件在窗体的水平左右移动（vb怎么用键盘方向键控制控件移动）

Option ExplicitDim W As LongPrivate Sub Command1_Click()Timer1.Interval = 100End SubPrivate Sub Command2_Click()Timer1.Interval = 0End SubPrivate Sub Timer1_Timer()W = Me.WidthIf Label1.Left > W Then Label1.Left = 0 - Label1.Width Else Label1.Left = Label1.Left + 84End IfEnd Sub附源文件，VB6运行通过。