情人节vb打造小程序(教程)
本文最后更新于 2694 天前,其中的信息可能已经有所发展或是发生改变。

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

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

需要的工具 百度下载一个精简版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

暂无评论

发送评论 编辑评论


|´・ω・)ノ
ヾ(≧∇≦*)ゝ
(☆ω☆)
(╯‵□′)╯︵┴─┴
 ̄﹃ ̄
(/ω\)
∠( ᐛ 」∠)_
(๑•̀ㅁ•́ฅ)
→_→
୧(๑•̀⌄•́๑)૭
٩(ˊᗜˋ*)و
(ノ°ο°)ノ
(´இ皿இ`)
⌇●﹏●⌇
(ฅ´ω`ฅ)
(╯°A°)╯︵○○○
φ( ̄∇ ̄o)
ヾ(´・ ・`。)ノ"
( ง ᵒ̌皿ᵒ̌)ง⁼³₌₃
(ó﹏ò。)
Σ(っ °Д °;)っ
( ,,´・ω・)ノ"(´っω・`。)
╮(╯▽╰)╭
o(*////▽////*)q
>﹏<
( ๑´•ω•) "(ㆆᴗㆆ)
😂
😀
😅
😊
🙂
🙃
😌
😍
😘
😜
😝
😏
😒
🙄
😳
😡
😔
😫
😱
😭
💩
👻
🙌
🖕
👍
👫
👬
👭
🌚
🌝
🙈
💊
😶
🙏
🍦
🍉
😣
Source: github.com/k4yt3x/flowerhd
颜文字
Emoji
小恐龙
花!
上一篇
下一篇