Question

请帮我下以下编写代码 vb 有3个命令按钮，单击按钮1放大窗体，单击按钮2缩小窗体，单击按钮3关闭窗体

Answer 1

Private Sub Command1_Click()
Me.Width = Me.Width * 1.1
Me.Height = Me.Height * 1.1
End Sub

Private Sub Command2_Click()
Me.Width = Me.Width * 0.9
Me.Height = Me.Height * 0.9
End Sub

Private Sub Command3_Click()
Unload Me
End Sub

Answer 2

Private Sub Command1_Click()
Me.WindowState = 2
End Sub

Private Sub Command2_Click()
Me.WindowState = 0
End Sub

Private Sub Command3_Click()
Unload Me
End Sub