十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
你都用.net了,这是vb的旧语法,不推荐使用。vb.net是面向对象的,推荐您使用
成都创新互联公司是一家集网站建设,宁安企业网站建设,宁安品牌网站建设,网站定制,宁安网站建设报价,网络营销,网络优化,宁安网站推广为一体的创新建站企业,帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿,时刻以成就客户成长自我,坚持不断学习、思考、沉淀、净化自己,让我们为更多的企业打造出实用型网站。
dim
opf
as
new
io.filestream(openfiledialog1.filename,
io.filemode.open)
...
opf.close
或是
using
opf
as
new
io.filestream(openfiledialog1.filename,
io.filemode.open)
...
end
using
但是你如果执意要用的话,也可以:
fileopen(1,
openfiledialog1.filename,
openmode.input)
...
fileclose(1)
'这里可以同时关闭多个文件号,文件号之间用,隔开
你都用.net了,这是vb的旧语法,不推荐使用。vb.net是面向对象的,推荐您使用
dim OpF as new io.filestream(OpenFileDialog1.FileName, IO.FileMode.Open)
...
OpF.close
或是
Using OpF as new io.filestream(OpenFileDialog1.FileName, IO.FileMode.Open)
...
End Using
但是你如果执意要用的话,也可以:
FileOpen(1, OpenFileDialog1.FileName, OpenMode.Input)
...
FileClose(1) '这里可以同时关闭多个文件号,文件号之间用,隔开
appid = Shell("explorer.exe c:\windows", vbNormalNoFocus)
If appid 0 Then Shell "Taskkill /PID " appid, vbHide
软糖来回答罗:通过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