你都用.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