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

打开程序保存的文档提示文档已被其他应用程序锁定,是否已只读方式打开关闭程序后,可以正常打开PrivateSubToolStripMenuItem1_Click(ByVal... 打开程序保存的文档提示文档已被其他应用程序锁定,是否已只读方式打开
关闭程序后,可以正常打开
Private Sub ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem1.Click
Dim fName As String
SaveFileDialog1.Filter = "文本文件(*.txt)|*.txt" '设定文件类型
DialogResult = SaveFileDialog1.ShowDialog() '显示存档对话方框
If DialogResult = Windows.Forms.DialogResult.Cancel Or _
DialogResult = Windows.Forms.DialogResult.No Then Exit Sub
fName = SaveFileDialog1.FileName '取得文件名
Dim SaveFile As New FileInfo(fName) '建立FileInfo对象
Dim FS As FileStream = SaveFile.Create() '建立FileStream对象
Dim ChArray() As Char = TextSend.Text.ToCharArray '转字符串转为字符数组
Dim i As Integer
For i = 0 To ChArray.GetUpperBound(0)
FS.WriteByte(Asc(ChArray(i))) '写入文件
Next i
End Sub
展开
 我来答
charlybus
2011-07-16 · 超过17用户采纳过TA的回答
知道答主
回答量:42
采纳率:0%
帮助的人:31.8万
展开全部
打开的资源你没有关闭,可能你缺少调用类似FileStream.Close() 的方法.
追问
谢谢你,这是的代码,请帮忙看看。
追答
End Sub前加上FS.Close()
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式