大侠门，如何是自己编的程序，在任务管理器内不可见阿？求教！

Question

app.visible=False
老兄，我怎么用不了阿，好像他说app中没这个属性阿

Answer 1

给你二种方法：
1、使用APP属性
'不显示
sub form_load()
App.TaskVisible=false
end sub'显示
sub form_load()
App.TaskVisible=true
end sub2、用API注册为系统服务进程
在BAS中输入以下代码，并在FORM_LOAD中调用即可
Public Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long) As LongPublic Declare Function GetCurrentProcessId Lib "kernel32" () As LongPublic Declare Function GetCurrentProcess Lib "kernel32" () As LongPublic Const RSP_SIMPLE_SERVICE = 1
Public Const RSP_UNREGISTER_SERVICE = 0'不显示
Public Sub RemoveProgramFromList()
    Dim lngProcessID As Long
    Dim lngReturn As Long
    lngProcessID = GetCurrentProcessId()
    lngReturn = RegisterServiceProcess(lngProcessID, RSP_SIMPLE_SERVICE)
End Sub'显示
Public Sub AddProgramToList()
    Dim lngProcessID As Long
    Dim lngReturn As Long
    
    lngProcessID = GetCurrentProcessId()
    lngReturn = RegisterServiceProcess(pid, RSP_UNREGISTER_SERVICE)
End Sub

Answer 2

vb5.0哪有app属性啊,fso vb5.0没有