点击按钮后，怎么改变窗体高度?

[u010989825]

我写了代码，想要在窗体加载时ScaleHeight=1800，点击command1后ScaleHeight=12000，但是运行的时候实现不了，请问是哪里出了问题
Private Sub Command1_Click()
sales2.ScaleHeight = 12000
End Sub

Private Sub Form_Load()
sales2.ScaleHeight = 1800
End Sub

[OutFocus]

应该是改变size吧

[OutFocus]

[code=vb.net] Form1.Size=New Size(100,100) [/code]