代码:
[browser.vb]
...
Private Sub Browser_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If My.Computer.FileSystem.FileExists(DefaultHomePageSavedLocation) = False Then
My.Computer.FileSystem.CreateDirectory("C:\ToolBoxData\TinyBrowser\")
File.Create(DefaultHomePageSavedLocation)
My.Computer.FileSystem.WriteAllText(DefaultHomePageSavedLocation, "http://hk.yahoo.com", True)
End If
End Sub
[setting.vb]
...
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
My.Computer.FileSystem.DeleteFile("C:\ToolBoxData\TinyBrowser\Home.txt")
File.Create("C:\ToolBoxData\TinyBrowser\Home.txt")
My.Computer.FileSystem.WriteAllText("C:\ToolBoxData\TinyBrowser\Home.txt", TextBox1.Text, True)
End Sub
因此显示了错误消息:
IO异常未处理。
请帮忙。
答案 0 :(得分:3)
如果查看File.Create Method的文档,您将看到它是一个函数,它返回"一个FileStream,它提供对path中指定文件的读/写访问权限。"这意味着文件已打开。如果您查看FileSystem.WriteAllText Method的文档,您将看到您不需要事先创建文件,并且没有将文件流作为参数的重载。
所以,取出File.Create
行。
请记得告诉我们将来哪一行产生错误。