Private Sub Command1_Click()
Form1.Width = Form1.Width * 1.2
Form1.Height = Form1.Height * 1.2
End Sub
Private Sub Command2_Click()
Form1.Left = Form1.Left + 200
Form1.Top = Form1.Top + 100
End Su
Private Sub Command1_Click()
Form1.Width = Form1.Width * 1.2
Form1.Height = Form1.Height * 1.2
End Sub
Private Sub Command2_Click()
Form1.Left = Form1.Left + 200
Form1.Top = Form1.Top + 100
End Su