你可以嘗試這樣的事情。創建一個SaveFileDialog並將其默認位置和文件名的所有參數傳遞給它。根據您的文件創建一個新的文件流(創建或覆蓋)並將該流傳遞給RichTextBox的SaveFile方法
Using sfd As New SaveFileDialog()
sfd.AddExtension = True
sfd.Filter = "*.xml|*.xml"
sfd.OverwritePrompt = True
sfd.DefaultExt = ".xml"
sfd.CreatePrompt = False
sfd.InitialDirectory = Path.Combine(Environment.SpecialFolder.MyComputer, "\MyDocs\")
sfd.FileName = "Test.xml"
If sfd.ShowDialog = Windows.Forms.DialogResult.OK AndAlso sfd.FileName <> String.Empty Then
Using sf As New FileStream(sfd.FileName, FileMode.Create)
TextBox4.SaveFile(sf, RichTextBoxStreamType.UnicodePlainText)
End Using
End If
End Using
您能顯示更多代碼嗎? TextBox不包含.SaveFile()方法,所以我很困惑你甚至調用了這個方法? --Nevermind,它的一個RichTextBox – pinkfloydx33