.子程序 __启动窗口_创建完毕
Count = 0
列表框.清空 ()'清空列表框
RenHWND = 取得窗口_ (取窗口句柄 (), 0)‘这句应该是取窗口句柄,FindWindowA(类名,标题)
RetValue = 取窗口标题_ (RenHWND, WinText, 256)‘取窗口标题,标题保存在WinText参数里面
.如果真 (RetValue ≠ 0)‘判断标题是否取成功
' 取文本左边 (到文本 (WinText), WinTextLength) ≠ 标题
WinTextLength = 取标题文本长度_ (RenHWND)‘判断标题长度
.如果真 (取文本左边 (到文本 (WinText), WinTextLength) ≠ 标题)’取标题左边,长度为WinTextLength,,取出来的文本和“标题”变量的值进行比较
列表框.加入项目 (到文本 (WinText), )‘如果标题不相等就执行此句
.如果真结束
.如果真结束
RenHWND = 取得窗口_ (RenHWND, #c)’取窗口句柄,#C应该是文本常量
RetValue = 取窗口标题_ (RenHWND, WinText, 256)‘取窗口标题
.判断循环首 (RenHWND ≠ 0)’判断有没有取到句柄
.变量循环首 (0, 列表框.取项目数 () - 1, 1, 临时变量)'起始变量值为0,目标变量值为列表框项目数-1,每循环一次变量加1,递增值保存在临时变量里
.如果真 (到文本 (WinText) = 列表框.取项目文本 (临时变量))‘判断列表框里面的某个项目的值是否等于WinText(上面取的标题)里面的值
WinText = TempText‘把TempText赋值给WinText
跳出循环 ()
.如果真结束
.变量循环尾 ()
.如果真 (到文本 (WinText) ≠ “”)'如果WinText不等于空值,往下执行
列表框.加入项目 (到文本 (WinText), )‘加入列表项
.如果真结束
RenHWND = 取得窗口_ (RenHWND, #GW_HWNDNEXT)’继续取句柄
RetValue = 取窗口标题_ (RenHWND, WinText, 256)‘继续取标题
.判断循环尾 ()
您好
您可以到腾讯电脑管家官网下载电脑管家
然后右击该程序【扫描病毒(电脑管家)】检测一下即可
电脑管家是通过VB100测试的杀毒软件,检测木马病毒非常精准,如果检测结果为无毒就说明是安全的,可以放心。
如果还有其他疑问和问题,欢迎再次来电脑管家企业平台进行提问,我们将尽全力为您解答疑难
腾讯电脑管家企业平台:http://zhidao.baidu.com/c/guanjia/
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)