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

网站名称:vb.net怎么关闭文件,vb 关闭excel文件
文章路径:https://www.cdcxhl.com/article42/dssejhc.html

成都网站建设公司_创新互联,为您提供Google网站排名商城网站网站设计公司手机网站建设企业网站制作

广告

声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联

微信小程序开发