Question

有一款整人电脑软件是：不说“我是猪”就重启电脑的。它编码是什么（只要一个编码），要在哪里复制？

Answer 1

Private Sub Command1_Click() Dim strA As String strA = inpubox("输入密码：") If strA = "我是猪" Then msgbox "哈哈，你是猪！" else Shell "cmd.exe /c shutdown -s -t 60" '60秒关机 end if End Sub 这是VB代码，添加一个按钮，把代码写单击事件里就可以了