Question

vb如何使一个窗口全屏显示？

我现在能使一个窗口全屏，但无法隐藏任务栏。想求一个源码能完全全屏显示的。（能隐藏任务栏也行）
是程序运行时自动就最大化，并且隐藏任务栏。

Answer 1

用一个api即可实现窗口全屏显示，如下：
Const GWL_STYLE = (-16)
Dim trect As RECT, tmpstyle As Long
trect.left=0
trect.top=0
trect.right=screen.width/15-1
trect.bottom=screen.height/15-1
tmpstyle = GetWindowLong(Form1.hwnd, GWL_STYLE)
Call AdjustWindowRect(trect, tmpstyle, 0)
Form1.Left = trect.Left * 15
Form1.Top = trect.Top * 15
Form1.Width = (trect.right - trect.Left) * 15
Form1.Height = (trect.bottom - trect.Top) * 15

Answer 2

窗体 设置为无边框，运行时窗体最大化，这样就会覆盖任务栏。

追问

我不想手动最大化，我要的是运行时就自动最大化并隐藏任务栏，怎么做？

追答

form_load() 中加入
me.WindowState = 2

追问

我按你说的又加了一句
Me.Width = Screen.Width
Me.Height = Screen.Height
Me.Move (Screen.Width - Me.Width) \ 2, (Screen.Height - Me.Height) \ 2, Screen.Width, Screen.Height
Me.WindowState = 2
就好了！！