一道初级VB题,刚学,不会....

补充实验，在窗体上建立5个命令按钮和一个标签，5个命令按钮分别显示为：‘放大’‘加粗’‘下划线’‘还原’‘移动’，标签显示为：‘VB程序设计’
编程序完成如下要求
1程序运行后，单击“放大”按钮，标签显示的文字放大3倍，单击“加粗”按钮，文字加粗，单击“下划线”，文字加下划线，单击“还原”，文字格式回到初始状态。
3每单击“移动”命令按钮一次，标签则向左移动一定距离，单击10次，则移动到最左边（label1.left=0）

谢谢大虾把整个程序写出来,一万个谢谢...

Dim length As Integer
Dim size
Private Sub Command1_Click()
Label1.fontsize = 3 * Label1.fontsize
End Sub

Private Sub Command2_Click()
Label1.FontBold = True
End Sub

Private Sub Command3_Click()
Label1.FontUnderline = True
End Sub

Private Sub Command4_Click()
Label1.fontsize = size
Label1.FontUnderline = False
Label1.FontBold = False
End Sub

Private Sub Command5_Click()
Label1.Left = Label1.Left - length
End Sub

Private Sub Form_Load()
Label1.Caption = "VB程序设计"
Command1.Caption = "放大"
Command2.Caption = "加粗"
Command3.Caption = "下划线"
Command4.Caption = "还原"
Command5.Caption = "移动"
length = (Label1.Left) / 10
size = Label1.fontsize
End Sub

Dim OldSize
Dim OldLeft

Private Sub Command1_Click()
Label1.FontSize = 3 * Label1.FontSize