❶ HideToolz.exe用这个本来没事 后来就用了马上蓝屏 怎么办啊 谁有别的隐藏进程的工具啊 HideApp不算
朋友,电脑蓝屏的原因是很复杂的,这是:软件之间有冲突!(答案原创,引用请说明原作者:力王历史)
1。如果这是偶然,一般重启电脑,症状便可消失!
2。杀毒不彻底,(使用杀毒软件,全盘扫描和自定义扫描)!
如果杀到木马或病毒后,应立即重启, 重启电脑后,来到“隔离|恢复”,彻底删除,木马和病毒!
3。软件冲突,不兼容:多余的同类软件安装,(360管家,软件卸载,找到卸载,再:强力清扫)!比如:播放器重复或有相似的,杀毒,浏览器,游戏,输入法有同类多余的,卸载多余的,只留一款!
4。电脑系统有顽固的病毒和木马或蠕虫干扰,或者磨雀猜丢失了系统文件(360系统急
救箱或金山急救箱,金山网盾等等,其中任意一款,全盘查杀,再:系统修复)
5。软件需要更新,(360管家,软件升级,下载,覆盖安装,winrar可以不升)
6。系统有新的漏洞等待安装,(修补高危和重要的,其它设置为:忽略)
7。显卡或内存cpu,或风扇的接触不瞎型良和松动或有灰尘覆盖,(拔下橡皮擦擦)
8。内存cpu过热,散热性不好!(开机时间不要太长,关机散热)
9。电脑存在恶评插件! (扫描出来,立即清理)或磁盘碎片过多,(系统工具),清理碎片!
10。如果还是不行,说明系统文件丢失了!或者系统内存有很严重的错误了!
11。试试开机后按F8,回车,回车,进安全模式里,最后一次正确配置,按下去
试试!或者,进安全模式,到桌面后,全盘杀毒!
12。玩游戏蓝屏,一般就是系统不支持这款游戏!(更换游戏版本或换xp系统)
13。下载的游戏,播放器,输入法,下载工具,浏览器等,程序不稳定!(卸载
重装或升级至最新版本)
14。如果还是不行,需要“一键还原”系统岁手或“重装系统”了 !
❷ 怎么样用vb把一个exe程序隐藏起来
1,.vbp是vb的工程文件,也就是源代码,需要用microsoft
visual
basic
6.0
中文版这个ide编辑枯镇、查看的。野租所以在没有安装过vb
ide的机器上是不能运行的
2,.exe是microsoft
visual
basic
6.0
中文版编译生成的最终没脊粗可执行文件,windows平台都可以运行.exe文件
3,在microsoft
visual
basic
6.0
中文版里的“文件”菜单中,选“生成工程
项目.exe”,就可以制作.exe文件了
❸ HideApp隐藏应用程序问题!
网吧安装屏蔽吧~`
❹ 用vb程序设计一个“定时器”软件,要求定时时间到时会播放一段音乐,那个音乐怎么弄啊!谁能能帮帮忙
加入一个定时器控件,interval属性改为1000,
加入一个命令按键控件,caption属性毁衫改为“开始计时”,
加入一个复选框控件,cpation属性改“开始计时后自动隐藏程序”,
其它属性一律不要动!
然后打开代码窗口,把里面的内容清空,把下面一段代码粘贴进去:
Dim dingshi As String
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sub PlayWavFile(strFileName As String, PlayCount As Long, JianGe As Long)
'strFileName 要播放的文件名(带路径)
'playCount 播放的次数
'JianGe 多次播放时,每次的时间间隔
If Len(Dir(strFileName)) = 0 Then Exit Sub
If PlayCount = 0 Then Exit Sub
If JianGe < 1000 Then JianGe = 1000
DoEvents
sndPlaySound strFileName, 16 + 1
Sleep JianGe
Call PlayWavFile(strFileName, PlayCount - 1, JianGe)
End Sub
Private Sub Command1_Click()
Timer1.Enabled = True
If Check1.Value = 1 Then
Form1.Hide
App.TaskVisible = False
End If
End Sub
Private Sub Form_Load()
Show
Timer1.Enabled = False
dingshi = InputBox("时间格式为00:00:00,请输入正确,否则出错", "输入")
End Sub
Private Sub Timer1_Timer()
If dingshi = Time$ Then
PlayWavFile "C:\Documents and Settings\Administrator\桌面\配音\火星片花-广告回来继续关注.wav", 1, 1000
End If
End Sub
输入时间格式时那个冒号要是英文的冒号,中文的会出错,
最后这岁李句PlayWavFile "C:\Documents and Settings\Administrator\桌面\配音\火星片花-广告回来继续关注.wav", 1, 1000
路径改成你的声音路径,乎余迟格式必须是.wav格式的,不然播放不出来,后面那个1是重复次数,那个1000是重复时的间隔,还不懂就追问我,忙活了这么长时间,怎么也得给个辛苦分吧?
❺ 藏游戏的软件
应用隐藏大师、隐藏游戏大师、HideApp、小隐大师、黑洞闭弯app。
隐藏游戏的软竖大件是一些人觉得非常实用的桌面工具,当你家人想要你学习而你却想要玩游戏时,这样的软件就会让你瞬间隐藏游戏避免被当场发现,让你的家人检查不出来任何问题。
此外这些程序还有保留某些窗口,关闭声音,自定义快捷键,隐藏任务栏,隐藏桌面,关轿纤闷闭程序等辅助功能。
软件操作容易,界面简洁,不需要长时间摸索就能熟练使用。
❻ 可以藏游戏的隐藏空间软件
应用隐藏大师、隐藏游戏大师、HideApp、小隐大师、黑洞app。
隐藏游戏的软件是一些人觉得非常实用的桌面工具,当你家人想要你学习而你却想要玩游戏时,这样的软件就会让你瞬间隐藏游戏避免被当场发现,让你的家人检查不出来任何问题。
此外这些程序还有保留某些窗口,关闭声音,自定义快捷键,隐藏任务栏,隐藏桌面,关闭程序等辅助功能。
软件操作容易,界面简洁,不需要长时间摸索就能熟练使用。
❼ 越狱成功啦,怎么删除系统自带软件
找到hideappsnoJB如图,下面那禅兆凳个就是iOS7的方法hideappsiniOS7找到hideappsnoJB如图,下面那个就是iOS7的方法hideappsiniOS7进去后想删除哪个程序,就点一下,弹出贺旅提示框猜脊点安装,它会提示无法完成,点击完成,然后在桌面通过删除程序的方法删除图标就ok
❽ 用HideToolz这个工具隐藏不了进程怎么办
简单百宝箱团队推游则荐使用简单搭圆百宝箱的隐藏工具 工具介绍:通用的进程隐藏工具,可以隐藏任意进程。 使用方法说明:使用方法十分简单,只要运行工具,选择需要隐藏的进程,单击“隐藏”就可以了! 进程隐藏工具详细介绍地址:www.jdbbx.com/ToolsList/Tool596.shtml进程隐藏工具下载地址:知磨塌 http://down.jdbbx.com/bbx/oem_soft/HideApp.zip
❾ vb程序求助
给你个监视IE下载程序的例子
form :
Private Declare Function GetForegroundWindow Lib "user32" () As Long
Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hWnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
'Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wparam As Long, lparam As Any) As Long
Private Const BM_SETCHECK = &HF1
Dim i As String
Dim ihwnd As Long
Private Sub Form_Load()
Me.Hide
App.TaskVisible = False
End Sub
Private Sub Timer1_Timer()
'ii = ii + 1
'If ii = 1111 Then ii = 1
h = GetForegroundWindow()
i = Space(256)
GetWindowText h, i, 255
If Left(i, 4) = "文件下载" Or Left(i, 4) = "下载完毕" Or Left(i, 3) = "已复神判制" Or Left(i, 3) = "已完成" Then Call check
'猜裂Timer1.Enabled = Falses
'End If
End Sub
Sub check()
ihwnd = FindWindow(vbNullString, i)
EnumChildWindows ihwnd, AddressOf EnumChildProc, ByVal 0&
'Call Sleep((1000))
SendMessage dhwnd, BM_SETCHECK, 0, 0
End Sub
Mole:
Declare Function GetDlgItem Lib "user32" (ByVal hDlg As Long, ByVal nIDDlgItem As Long) As Long
Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hWnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long
Declare Function GetDesktopWindow Lib "user32"穗瞎闭 () As Long
Declare Function EnumChildWindows Lib "user32" (ByVal hWndParent As Long, ByVal lpEnumFunc As Long, ByVal lparam As Long) As Long
Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hWnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hWnd As Long) As Long
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Declare Function GetDlgCtrlID Lib "user32" (ByVal hWnd As Long) As Long
Public Declare Function SetFocus1 Lib "user32" Alias "SetFocus" (ByVal hWnd As Long) As Long
Public Const WM_GETTEXT = &HD
Public dhwnd As Long
Function EnumChildProc(ByVal hWnd As Long, ByVal lparam As Long) As Long
Dim Cn As String * 256
Dim Tx As String * 256
Dim sSave As String
GetClassName hWnd, Cn, 255
sSave = Space$(GetWindowTextLength(hWnd) + 1)
GetWindowText hWnd, sSave, Len(sSave)
sSave = Left$(sSave, Len(sSave) - 1)
If sSave = "下载完毕后关闭该对话框(&C)" Then
dhwnd = hWnd
End If
EnumChildProc = 1
End Function
作用是:不能取消“下载通知”
❿ VB程序后台运行
vb 窗口最小到冲芦缺时间边上从底部弹出
1、新建立一个VB6工程,将Form1的ShowInTaskBar属性设置为False -----------------------------------------------
2、菜单:工程--添加模块 按“打开”这样就添加了一个新模块,名为Mole1,保存为散辩Mole1.bas -------------------
3、在Mole1中写下如下代码: ------------------------------------------------------------------------------
Option Explicit
Public Const MAX_TOOLTIP As Integer = 64
Public Const NIF_ICON = &H2
Public Const NIF_MESSAGE = &H1
Public Const NIF_TIP = &H4
Public Const NIM_ADD = &H0
Public Const NIM_DELETE = &H2
Public Const WM_MOUSEMOVE = &H200
Public Const WM_LBUTTONDOWN = &H201
Public Const WM_LBUTTONUP = &H202
Public Const WM_LBUTTONDBLCLK = &H203
Public Const WM_RBUTTONDOWN = &H204
Public Const WM_RBUTTONUP = &H205
Public Const WM_RBUTTONDBLCLK = &H206
Public Const SW_RESTORE = 9
Public Const SW_HIDE = 0
Public nfIconData As NOTIFYICONDATA
Public Type NOTIFYICONDATA
cbSize As Long
hWnd As Long
uID As Long
uFlags As Long
uCallbackMessage As Long
hIcon As Long
szTip As String * MAX_TOOLTIP
End Type
Public Declare Function ShowWindow Lib "user32" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long
Public Declare Function Shell_NotifyIcon Lib "shell32.dll" Alias "Shell_NotifyIconA" (ByVal dwMessage As Long, lpData As NOTIFYICONDATA) As Long
4、在Form1的代码全部如下:-----------------------------------------------------------------------------
Private Sub Form_Load()
'以下把程序放入System Tray====================================System Tray Begin
With nfIconData
.hWnd = Me.hWnd
.uID = Me.Icon
.uFlags = NIF_ICON Or NIF_MESSAGE Or NIF_TIP
.uCallbackMessage = WM_MOUSEMOVE
.hIcon = Me.Icon.Handle
'定义鼠标移动到托盘上时显示的Tip
.szTip = App.Title + "(版本 " & App.Major & "." & App.Minor & "哗肢." & App.Revision & ")" & vbNullChar
.cbSize = Len(nfIconData)
End With
Call Shell_NotifyIcon(NIM_ADD, nfIconData)
'=============================================================System Tray End
Me.Hide
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Call Shell_NotifyIcon(NIM_DELETE, nfIconData)
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim lMsg As Single
lMsg = X / Screen.TwipsPerPixelX
Select Case lMsg
Case WM_LBUTTONUP
'MsgBox "请用鼠标右键点击图标!", vbInformation, "实时播音专家"
'单击左键,显示窗体
ShowWindow Me.hWnd, SW_RESTORE
'下面两句的目的是把窗口显示在窗口最顶层
'Me.Show
'Me.SetFocus
'' Case WM_RBUTTONUP
'' PopupMenu MenuTray '如果是在系统Tray图标上点右键,则弹出菜单MenuTray
'' Case WM_MOUSEMOVE
'' Case WM_LBUTTONDOWN
'' Case WM_LBUTTONDBLCLK
'' Case WM_RBUTTONDOWN
'' Case WM_RBUTTONDBLCLK
'' Case Else
End Select
End Sub
7、现在将程序保存起来运行看看系统托盘处是否增加了一个本工程的图标。单击此图标,Form1就自动弹出来了