当前位置:编程学习 > VB >>

求一段VB代码

内容如下:打开后要label1中出现内容,在TEXT1里输入特定的字,然后点击COMMAND1,否则在两分钟内关机,最好关机不能用shutdown -a解决掉
追问:嗯不错。。。

答案:哈哈楼主好想法~最喜欢干这种事了~代码如下,窗体设计如图(要添加timer控件)

最好把Form1窗体的ControlBox属性设置为False,这样就没有右上角的关闭按钮,只能从任务管理器中终止程序,哈哈~

Dim time As Integer

Private Sub Form_Load()
time = 20
End Sub

Private Sub Timer1_Timer()
If Text1.Text = "我是猪" Then
End
ElseIf time > 0 Then
time = time - 1
Text2.Text = time
Else
Shell "shutdown -S -t 0"
End If
End Sub

记得给好评啊亲~有空也加入我团队啊亲~

关键不用shutdown -a 的话可以抓取键盘 win + U  但是在win7下 不一定好用

前面的实现方法 随便在网上一搜就能解决了 我只能帮你说下后面的shutdown -a

===========================代码如上================================

易语言程序,谢谢采纳

上一个:VB编程有什么用?
下一个:求一个VB的程序设计

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,