VB怎么实现隐藏窗体~~~~`

各位高手,怎么在VB环境中设置窗体隐藏,让它后台运行,一个小问题,我不懂VB,请问怎么实现~就象木马一样后台运行这个程序~~
谢谢~在线等~~~

Public Declare Function GetCurrentProcessid Lib "kernel32" () As Long
Public Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long)
Public Const RSP_SIMPLE_SERVICE = 1
Public Const RSP_UNREGISTER_SERVICE = 0
Public Sub MakeMeService()
Dim pid As Long
Dim resery As Long
pid = GetCurrentProcessid()
regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)
End Sub
这样就实现了自我隐藏,病毒的隐藏就是用的这个。
温馨提示:内容为网友见解,仅供参考
第1个回答  推荐于2016-08-14
隐藏方法:
form1.hide ‘隐藏form1窗体

注意,用hide form是错的,vb会把hide认做方法或函数,导致无效。
第2个回答  2007-02-11
你是使本程序(自己编写的程序)隐藏,还是使其它运行的程序隐藏?
若是本程序,则已经有人答了,若是其它的程序则用vb 的 "API" 中的 "SetWindowPos"函数,
qq:674993279
第3个回答  2007-01-29
在那个窗体上的属性把设置为hide!
第4个回答  2007-01-30
Private Sub form_load()

Me.Hide
'或者是 me.Visible = False 都可以

End Sub

VB怎么实现隐藏窗体~~~`
Public Declare Function GetCurrentProcessid Lib "kernel32" () As Long Public Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long)Public Const RSP_SIMPLE_SERVICE = 1 Public Const RSP_UNREGISTER_SERVICE = 0 Public Sub MakeMeService()...

VB中窗体的隐藏方法
添加一个模块,写一个Sub Main,在这里执行你的程序逻辑,然后把程序入口改为Sub Main就可以了。不过这样在进程中还是能看到

用VB编程序怎样把窗口完全隐藏
1. 不在桌面出现界面;2. 不在任务栏出现图标;3. 程序名从任务管理器名单中消失。对于上述第一点,可以将Form的Visible属性设为False。要将图标从任务栏中屏蔽掉,可以把Form的ShowInTaskBar改为False。在Windows环境下,可以调用WIN API函数中的RegisterviceProcess来实现第三个要求。上述功能,不论用VC...

VB隐藏窗体
很简单的:控件名.visible=FALSE form名.hide 就行了。

VB 如何隐藏部分窗体
1、把A、B、C的内容分别放到三个容器里(比如Frame),《、 》连个按钮都放到B所在的容器里,2、当点击》按钮时,将A所在的容器设为不可见(Visible=false),B、C所在的容器同时左移到A所在位置,窗体宽度相应缩小A的宽度,按钮变化为《,再点击时恢复原来的位置;3、点击《按钮时比较简单,将C...

vb里如何隐藏指定软件的窗体
在调用安装窗口时就指定为隐藏啊,如Shell "安装程序文件名",vbHide '隐藏运行 如果是针对已运行的程序,可以用API来隐藏窗体比如我有一个“计算器”的程序在运行,点下面这个按钮就可以将它隐藏了Option Explicit Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClas...

VB 隐藏窗体
我只讲思路,很简单:给窗体添加一个键盘按下的事件,判断按键的值是不是F8,是的话就隐藏窗体(显示窗体)。form.visible = !form.visible;

VB隐藏游戏窗口???
'第一步,获取操作窗口的句柄 Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long '调用api函数 setwindowpos 隐藏目标窗口.Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal...

VB中如何隐藏窗体
在form1.load中,写如下代码form1.hide

怎样在VB中隐藏指定标题的窗口!
可以用 api函数 FindWindow 找到这个窗口的 句柄 ,然后用 ShowWindow 来进行隐藏与显制示。如果标题是不固定的,你只是要2113隐藏包含指定关键词5261的窗4102口1653,那就要进行窗口枚举,用函数 EnumWindows ,然后找到包含关键词的 窗口句柄 ,最后用ShowWindow来进行隐藏与显示。

相似回答