如何让VB程序启动后不在任务栏显示?
有一个VB小程序,能不能让它启动后不在任务栏上显示?就像Windows的系统对话框那样?能不能通过加代码实现?用一楼的方法话,就是整个程序都隐藏了。可我只想让它不再任务栏...
有一个VB小程序,能不能让它启动后不在任务栏上显示?就像Windows的系统对话框那样?能不能通过加代码实现?
用一楼的方法话,就是整个程序都隐藏了。
可我只想让它不再任务栏上显示,界面应该还是能看到的(像Windows对话框)。劳你们费心再想想。 展开
用一楼的方法话,就是整个程序都隐藏了。
可我只想让它不再任务栏上显示,界面应该还是能看到的(像Windows对话框)。劳你们费心再想想。 展开
展开全部
办法如下:
1、首先在一个模块中做如下声明:
Public Const SW_HIDE = 0
Public Const GW_OWNER = 4
Declare Function GetWindow Lib "user32" Alias "GetWindow" (ByVal hwnd As _
Long, ByVal wCmd As Long) As Long
Declare Function ShowWindow Lib "user32" Alias "ShowWindow" (ByVal hwnd _
As Long, ByVal nCmdShow As Long) As Long
2、 将下面的代码添加到窗体的Load事件中:
Dim rc As Long
Dim OwnerhWnd As Long
'让窗体不可见
Me.Visible = False
'从任务管理器列表中移除
wnerhWnd = GetWindow(Me.hWnd, GW_OWNER)
rc = ShowWindow(OwnerhWnd, SW_HIDE)
1、首先在一个模块中做如下声明:
Public Const SW_HIDE = 0
Public Const GW_OWNER = 4
Declare Function GetWindow Lib "user32" Alias "GetWindow" (ByVal hwnd As _
Long, ByVal wCmd As Long) As Long
Declare Function ShowWindow Lib "user32" Alias "ShowWindow" (ByVal hwnd _
As Long, ByVal nCmdShow As Long) As Long
2、 将下面的代码添加到窗体的Load事件中:
Dim rc As Long
Dim OwnerhWnd As Long
'让窗体不可见
Me.Visible = False
'从任务管理器列表中移除
wnerhWnd = GetWindow(Me.hWnd, GW_OWNER)
rc = ShowWindow(OwnerhWnd, SW_HIDE)
展开全部
窗体的Showintaskbar属性改成False
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
private sub form_load()
me.hide
end sub
那样的话
在窗体属性里 把ShowInTaskbar 设置为False就可以了,不需要代码
me.hide
end sub
那样的话
在窗体属性里 把ShowInTaskbar 设置为False就可以了,不需要代码
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询