vb.net关机指令 用vb写一个关机程序( 三 )


先创建一个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 设定时间倒计时关机代码?在窗体上添加一个Timer控件,一个CommandButton按钮,一个TextBox控件 , 然后复制下面代码:
Dim
dTime
As
Long
Private
Sub
Form_Load()
Timer1.Interval
=
1000
Timer1.Enabled
=
False
End
Sub
Private
Sub
Command1_Click()
dTime
=
CInt(Text1.Text)
Timer1.Enabled
=
True
End
Sub
Private
Sub
Timer1_Timer()
dTime
=
dTime
-
1
If
dTime
=
Then
Shell
"C:\WINDOWS\system32\shutdown.exe
-s
-f
-t
0"
'调用系统关机命令
End
Sub
如何在编的VB.NET程序使用时关闭电脑有两种方法,第一种是调用shutdown.exe
shell("shutdown.exe路径
-s
-t
0")
'-t是延迟时间 , 0表示立刻关机
另一种就是使用API了 , 好像是ExitWindow,你可以去搜索一下其用法 。
怎样才能用VB.NET的代码来关闭一个在运行的程序软糖来回答罗:通过System.Diagnostics命名空间下的Process类来关闭程序的进程
Dim 进程集合 = Process.GetProcessesByName("进程名称")
For Each 进程 In 进程集合
进程.Kill()
'进程.Close() '或者使用关闭
Next
也可以先获取所有进程,再来判断这些进程的名称ProcessName
Dim 获取本地所有进程 = Process.GetProcesses()
For Each 进程 In 获取本地所有进程
If 进程.ProcessName = "explorer.exe" Then 进程.Kill()
Next
vb.net关机指令的介绍就聊到这里吧,感谢你花时间阅读本站内容 , 更多关于用vb写一个关机程序、vb.net关机指令的信息别忘了在本站进行查找喔 。

推荐阅读