点击下载此附件

VBA代码：
Private Sub Form_Timer()  '计时器触发事件
    Me.Label1.Caption = Mid(Me.Label1.Caption, 2) & Left(Me.Label1.Caption, 1)
End Sub

Private Sub 开启_Click()
    Me.TimerInterval = 300
    Form_Timer
End Sub

Private Sub 停止_Click()
    Me.TimerInterval = 0
End Sub

 C#代码:
        private void timer1_Tick(object sender, EventArgs e)  //计时器触发事件
        {
            label1.Text = label1.Text.Substring(1) + label1.Text.Substring(0, 1);
        }

        private void btn停止_Click(object sender, EventArgs e)
        {
            timer1.Enabled = false;
        }

        private void btn开启_Click(object sender, EventArgs e)
        {
            timer1.Enabled = true;
        }