vb.net重启自身 vbnet ini( 二 )


注销button 按钮输入code
Private Sub Button _Click(ByVal sender As System Object
ByVal e As System EventArgs) Handles Button ClickLogoOff() 注销计算机End Sub
双击重新启动按钮button 输入code
Private Sub Button _Click(ByVal sender As System Object
ByVal e As System EventArgs) Handles Button Click
Reboot()
End Sub
双击关闭计算机按钮button 输入code
Private Sub Button _Click(ByVal sender As System Object
ByVal e As System EventArgs) Handles Button Click startTime = TimeOfDay If Not IsDate(TextBox Text) Then 用IsData函数判断输入的时间格式MsgBox( 你所输入的不是时间格式 ! 错误 ) ElseentTime = TimeValue(TextBox Text) End If Timer Enabled = True启动定时器 Me WindowState = System Windows Forms FormWindowState Minimized最小化窗体
End Sub
如图

双击timer 控件如图

输入代码
Private Sub Timer _Tick(ByVal sender As System Object
ByVal e As System EventArgs) Handles Timer Tick xianzaiTime = TimeOfDay If RadioButton Checked Then
If DateDiff(Microsoft VisualBasic DateInterval Second
xianzaiTime entTime)Then 用DateDiff函数判断是否到时间了
End IfEnd If
PowerOff() 关闭计算机End Sub
好了 基本上一个定时关机程序就完成了 接下来加一个超级链接吧!当然对于高手来说可能是废话 但是对于新手来说这也是必备的 这个超级链接当然是我们最喜欢的天极网开发频道了
先创建一个Label控件吧 把它托到窗体上 将text属性设置为天极网开发频道如图

接下来需要输入代码了 双击窗体Form
进入Public Class Form 事件
代码
Private Declare Function ShellExecute Lib shell dll
Alias ShellExecuteA (ByVal hwngnd As Integer
ByVal lpOperation As String ByVal lpFile As String
ByVal lpParameters As String ByVal lpDirectory As String
ByVal nShowCmd As Integer) As Integer
如图

双击刚才添加的label属性text:(天极网开发频道)中输入以下代码
Private Sub Label _Click(ByVal sender As System Object
ByVal e As System EventArgs) Handles Label ClickShellExecute( open CStr( ) CStr( ) )
End SubEnd Class
OK!全部搞定 按F 键运行如图 所示 选择相应选项后点击(关闭计算机启动定时器按钮)就可以了 现在程序将按照你所设定的时间而启动关闭计算机选项
lishixinzhi/Article/program/net/201311/12366
VB.NET里如何关闭ADODC控件连接ADODC自身大包了关闭功能,出现这样的问题,很有可能是程序在运行中途出现错误跳出,致使ADODC链接没断开 。退出VB.NET重新进入,不行就只能重启了 。
vb.net当程序报错时,如何重启vb.net程序出错后再重启程序,目前我能实现的最好的方法就是
先用shell命令 “生一个儿子”,然后“自己死掉” 。
第一句
Shell(Application.StartupPath"\我的程序.exe", vbNormalFocus)
第二句
End
完工?。。?
请问下在vb,vb.net或c#中添加系统服务时怎样设置在服务启动失败后重启服务!找了好久都不知道怎么设置个人意见,希望采纳:
:你先了解一下:
启动项英文msconfig
alerter -错误警报器,垃圾 , 关闭 。
application layer gateway service -给与第三者网络共享/防火墙支持的服务 , 有些防火墙/网络共享软件需要 。占用1 。5mb内存 。
application management-用于设定,发布和删除软件服务 。
automatic 更新s -windows自动更新,K,滚!
background intelligent transfer service -这个服务原是用来实现http1.1服务器之间的信息传输,微软称支持windows更新时断点续传
clipbook - 用与局域网电脑来共享 粘贴/剪贴的内容 。(K,想得出?。?

推荐阅读