VB程序如何实现全屏模式

答案:6 悬赏:30 手机版

解决时间 2021-05-22 18:49

提问者网友：杀手的诗
2021-05-22 04:01

我需要VB代码以及代码说明。

说明：

打开程序（Form1）直接进入全屏模式

Command1 退出全屏模式

最佳答案

五星知识达人网友：动情书生
2021-05-22 05:11

'先把form 的 BorderStyle 设置为 0 ，由于为只读，程序无法修改，在运行之前你先设置一下。
Private Sub Command1_Click()
'Unload Me '直接退出
Me.WindowState = vbNormal '恢复正常
End Sub
Private Sub Form_Load()
Me.WindowState = vbMaximized '启动时最大化
End Sub

全部回答

1楼网友：一叶十三刺
2021-05-22 09:21

代码如下:

Private Sub Form_Load() Me.BorderStyle = 0 Me.WindowState = 2 End Sub

Private Sub Command1_Click()

End

End Sub

2楼网友：轻熟杀无赦
2021-05-22 07:43

Private Sub Form_Load()

Me.Width = Screen.Width Me.Height = Screen.Height Me.WindowState = 2

End Sub

3楼网友：山君与见山
2021-05-22 07:29

设置窗体的BorderStyle = 0:WindowState = 2（这是在运行时全屏）

然后在Command事件中加入代码:Me.WindowState = 0即可.

4楼网友：一秋
2021-05-22 06:31

修改form1的两个属性

一个是borderstyle设置为0

第二个是windowstate为2

5楼网友：几近狂妄
2021-05-22 05:52

在Form的属性设置框中，设置BorderStyle为0，然后： Private Sub Form_Load() Me.Left = 0 Me.Top = 0 Me.Width = Screen.Width Me.Height = Screen.Height End Sub

然后设置个command，click事件中写入BorderStyle为1

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息