Question

vb6.0中怎样让窗体全屏显示？

Answer 1

1、首先在开发工具中打开VBA编辑器。

2、在单元格区域当中输入一些内容作为例子。

3、在VBA编辑器中插入模块。

4、在模块当中输入如下代码，然后运行Private Sub UserForm_Initialize() Me.Height=Application.Height '窗体高度等于Excel程序的高度 Me.Width=Application.Width  '窗体宽度等于Excel程序的宽度End Sub。

5、用快捷键F5运行窗体，则窗体全屏显示。

Answer 2

VB可设置窗体的WindowState 属性为2使窗体运行时最大化。

WindowState 属性，返回或设置一个值，该值用来指定在运行时窗体窗口的可视状态。

这个设置可在窗体属性页设置，也可在代码中设置。

Private Sub Form_Load()
    Me.WindowState = vbMaximized
End Sub

Answer 3

将窗体的WindowState属性设置为2-maximized

Answer 4

Private Sub Form_Load()
Form1.Width = Screen.Width
Form1.Height = Screen.Height
Move 0, 0
End Sub

追问

怎样把Command的click效果为退出全屏？