请大侠解决，问题：在窗体上放置一个按钮，单击按钮，让窗体充满屏幕。

[hanchunchun]

好求之

[moke520]

上面三层配合的真好

[chinaboyzyq]

1、在窗体的属性列表栏里选择BorderStyle为0或1或3或4
2、选择1时可以选择MaxButton为true,MinButton为true

然后：

Private Sub Command1_Click()
    Me.Move 0, 0, Screen.Width, Screen.Height
End Sub

[lsftest]

Private Sub Command1_Click()
windowstate=2
End Sub

[hanchunchun]

各位
Private Sub Command1_Click()
form1.width=screen.width
form1.hight=screen.hight
form1.left=0
form1.top=0
End Sub
与上面两个相比有什么本质的区别呢？

[xuggzu]

[Quote=引用 5 楼 hanchunchun 的回复:]
各位
Private Sub Command1_Click()
form1.width=screen.width
form1.hight=screen.hight
form1.left=0
form1.top=0
End Sub
与上面两个相比有什么本质的区别呢？
[/Quote]
你这个和1#楼的功能一样。2楼是最大化窗口，最大化后窗体边框看不到，不能移动。

[zhengoodman]

2楼是最大化代码。
1楼是全屏的代码。
看楼主要哪个了