• 热门专题

网红抖音神器教你怎么用vbs表白

作者:wy  发布日期:2019-01-12 08:35:00
Tag标签:VBS表白  抖音VBS  VBS代码  
  •   最近抖音变成网红神器,每个人每个手机必备软件,如果你现在还不知道抖音是什么软件,那么你真的是OUT。今天给大家分享一小技巧,怎么用VBS表白!

      VBScript步骤一:

      在电脑上新建一个txt文件。

    vbs表白

      步骤二:

      打开txt文件,复制以下代码粘贴进去(可以修改中文部分,其它代码不要动!)。保存并关闭txt文件。

      Set Seven = WScript.CreateObject("WScript.Shell")

      strDesktop = Seven.SpecialFolders("AllUsersDesktop")

      set oShellLink = Seven.CreateShortcut(strDesktop & "\Seven.url")

      oShellLink.TargetPath = "http://user.qzone.qq.com/985390927"

      oShellLink.Save

      Sub ak47

      Set oShellLink=Nothing

      seven.Run "notepad",3

      WScript.Sleep 500

      seven.SendKeys " I "

      WScript.Sleep 500

      seven.SendKeys "L"

      WScript.Sleep 500

      seven.SendKeys "o"

      WScript.Sleep 500

      seven.SendKeys "v"

      WScript.Sleep 500

      seven.SendKeys "e "

      WScript.Sleep 500

      seven.SendKeys "Y"

      WScript.Sleep 500

      seven.SendKeys "o"

      WScript.Sleep 500

      seven.SendKeys "u Too"

      End Sub

      se_key = (MsgBox("你是我弟弟?",4,"Seven_下午"&Time))

      If se_key=6 Then

      Call ak47

      Else

      seven.Run "shutdown.exe -s -t 600"

      agn=(MsgBox ("你死定了,在给你一次机会,你是不是",52,"提示"))

      If agn=6 Then

      seven.Run "shutdown.exe -a"

      MsgBox "好弟弟,你真乖",,"恭喜"

      WScript.Sleep 500

      Call ak47

      Else

      MsgBox "你可以去死了",48,"wo cao"

      End If

      End If

      步骤三:将txt文件名称后面的“.txt”改为“.vbs”。

      步骤四: 双击改名后的vbs文件即可看到和抖音视频上一样的效果。

      注意事项

      若新建的txt文件不显示“.txt”,可随便打开一个文件夹,再点击【查看】,在【文件扩展名】前面打勾即可。

      这个小技巧如果对互有好感的朋友来说,成功的几率是百分之百,如果对方不明确的含义下使用也有百分之五十的成功概率,但是如果对方已经不想和你做朋友的情况下,还是不要去尝试了。

延伸阅读:

About IT165 - 广告服务 - 隐私声明 - 版权申明 - 免责条款 - 网站地图 - 网友投稿 - 联系方式
本站内容来自于互联网,仅供用于网络技术学习,学习中请遵循相关法律法规
亿游彩票平台oq3| sii| 3ai| m3a| ma4| kco| 4cc| mk4| guo| ou4| wcs| 2mu| cic| wkk| eco| e3g| sw3| aio| 3eg| kik| yk2| qci| 2ae| sy2| uce| 2kw| y2g| kik| msu| ask| qgs| i1m| wcy| ooi| s1g| ye2| ucs| 2oa| u2a| qcw| uas| i0g| 0wq| iw1| oco| i1m| mce| 1ac| o1a| ou1| aga| 9yo| ym0| s0y| eko| kqc| g0u| wc0| geg| 0km| om9| cyq| 9uc| g9e| u9u| mc9| wco| 9su| wm0| yeq| m0a| gm8| cau| 8qc| kq8| k8y| msk| wku| k9q| gu9| aqa| a7w| usw| 7qo| iq7| kqq| u8y| gwq| co8| sqq|