VB在线求答案啊3、在“第3题”文件夹中写入适当的语句，实现如下功能：（1）单击“放大”按钮。标签文字放大2倍，单击“加

Option Explicit
Dim Fsize%, Lleft%, i%
Private Sub Command1_Click() '扩大
Label1.Font.Size = Fsize * 2
End Sub
Private Sub Command2_Click() '加黑
Label1.Font.Bold = True
End Sub
Private Sub Command3_Click() '下划线
Label1.Font.Underline = True
End Sub
Private Sub Command4_Click() '还原
With Label1.Font
.Size = Fsize
.Bold = False
.Underline = False
End With
End Sub
Private Sub Form_Load() '窗体装载准备
Fsize = Label1.Font.Size
Lleft = Label1.Left
Label1.AutoSize = True
Form1.AutoRedraw = True
End Sub
Private Sub Label1_Click() '标签左称
If i >= 5 Then Exit Sub
Label1.Move Label1.Left - Lleft / 5
End Su