vb.net怎么关闭文件,vb 关闭excel文件

vb.net如何关闭读取过的文件夹？

你都用.net了，这是vb的旧语法，不推荐使用。vb.net是面向对象的，推荐您使用

创新互联建站主营莎车网站建设的网络公司,主营网站建设方案,app软件开发公司,莎车h5成都小程序开发搭建,莎车网站营销推广欢迎莎车等地区企业咨询

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) '这里可以同时关闭多个文件号，文件号之间用,隔开

VB中文件的打开与关闭

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

'这里可以同时关闭多个文件号，文件号之间用,隔开

VB编程如何打开和关闭EXCEL文件？

下面所举的例子均假设F盘下有一个名为d.txt的文本文件，若需要尝试这些例子请作相应的改动。

一、用定长的String变量获取文本内容。由于定长String变量支持的下界为65400,所以在打开超过32K字节的文件时超出部分的字节将无法获取: Private   Sub   Command1_Cliack() Dim   sA   As   String   *   65400   '声明定长String变量   Open   "F:\d.txt "   For   Binary   As   #1   '用二进制打开文件 Get   #1,   ,   sA   '用Get语句从文件中获取字节 Text1   =   sA   '显示打开的文件 Close   #1   '关闭文件 End   Sub；

二、先声明一字符串变量，然后用空格填充字符串，使变量大小与文件大小一致，再通过Get语句将文件全部数据存储到变量中，从而达到获取整个文件字节数的目的。

此法可以打开大于32K的文件，但应该注意的是，装载文件的容器必须能装载大于32K的文件，下例用RichTextBox控件显示打开的文件： Private   Sub   Command1_Click()   Dim   sA   As   String Open   "f:\d.txt "   For   Binary   As   #1 sA   =   Space(LOF(1))   '用空格填充sA变量 Get   #1,   ,   sA   '用Get语句获取文件全部内容 RichTextBox1.Text   =   sA Close   #1 End   Sub；

三、用StrConv函数将文件的控制字符串数据和Unicode码之间进行转换，从而达到打开文件的目的。可打开任意大小文件。

再给一个简单例子： Private   Sub   Command1_Click() Open   "f:\d.txt "   For   Input   As   #1 RichTextBox1.Text   =   StrConv(InputB$(LOF(1),   1),   vbUnicode) Close   #1 End   Sub；

四、用Shell语句直接调出Windows的记事本，给个文件名即可轻而易举地打开文本文件。此法适合于打开程序的Readme文件(注意：在可执行文件和要打开的文本文件之间要有空格)： Shell   "NotePad.EXE   f:\d.txt ",vbNormalFucus；

五、用RichTextBox控件自身的LoadFile属性打开文件： RichTextBox1.LoadFile   "f:\d.txt ",   rtfText。

VB中如何关闭文件夹

vb关闭文件夹的方法是：

1、判断是否打开 2、如果开着就close

完整代码如下 ：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim myfolder As String = "C:\Test"

Dim OpenFolder As Object = CreateObject("shell.application")

For Each item In OpenFolder.Windows

'ComboBox1.Items.Add(item.document.folder.self.Path)

If item.document.folder.self.Path = myfolder Then

item.Quit()

End If

Next

End Sub

VB.net如何关闭已打开的文件夹

appid = Shell("explorer.exe c:\windows", vbNormalNoFocus)

If appid 0 Then Shell "Taskkill /PID " appid, vbHide

怎样才能用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