vb.net保存关闭,vbs关闭excel不保存

vb。net 我要保存一个listview和多个ComboBox为关闭前的状态

用文件记录,示例:记录窗体最后运行时的大小和位置

潘集网站制作公司哪家好,找成都创新互联!从网页设计、网站建设、微信开发、APP开发、响应式网站等网站项目制作,到程序开发,运营维护。成都创新互联从2013年成立到现在10年的时间,我们拥有了丰富的建站经验和运维经验,来保证我们的工作的顺利进行。专注于网站建设就选成都创新互联

Dim bolNotFrist As Boolean

Private Sub Form_Activate()

If bolNotFrist Then Exit Sub

If Len(Dir("c:\a.dat")) = 1 Then Exit Sub

Open "c:\a.dat" For Input As #1

Input #1, a, b, c, d

Me.Top = a

Me.Height = b

Me.Left = c

Me.Width = d

Close #1

bolNotFrist = True

End Sub

Private Sub Form_Unload(Cancel As Integer)

Open "c:\a.dat" For Output As #1

Print #1, Me.Top, Me.Height, Me.Left, Me.Width

Close #1

End Sub

4 17:29:18

vb.net 保存文件后不能打开,必须关闭后才能打开文件

打开的资源你没有关闭,可能你缺少调用类似FileStream.Close() 的方法.

VB.net怎样保存文件

保存文件的步骤为:

关闭流,特别是写入流

关闭并保存文件

示例代码如下:

Imports System.Windows.Forms

Imports System.IO

Imports System.Text

Sub SaveFileDemo()

'打开文件。如果文件不存在则创建新的文件

Dim myFile As New IO.FileStream("d:\data.txt", _

FileMode.OpenOrCreate, _

FileAccess.Write)

'在文件末尾添加一行 

Dim tw As New StreamWriter(myFile)

myFile.Seek(0, SeekOrigin.End)

tw.WriteLine("白刃格斗英雄连英模部队方队亮相阅兵")

'关闭流

tw.Close()

'关闭文件并保存文件

myFile.Close()

End Sub


分享标题:vb.net保存关闭,vbs关闭excel不保存
当前网址:http://cdiso.cn/article/dscsjed.html

其他资讯