2014-04-22 39 views
0

我怎样才能把这个说法变成了“另存为”对话框?更改.SaveFile保存为保持文件格式

Me.TextBox4.SaveFile(System.Environment.GetFolderPath(Environment.SpecialFolder.MyComputer) + "\MyDocs\Test.xml", RichTextBoxStreamType.UnicodePlainText) 

我需要保存这种格式,因为它是保存文件时唯一正常工作的格式。

谢谢。

+1

您能显示更多代码吗? TextBox不包含.SaveFile()方法,所以我很困惑你甚至调用了这个方法? --Nevermind,它的一个RichTextBox – pinkfloydx33

回答

0

你可以尝试这样的事情。创建一个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 
+0

我测试你的代码,我得到一个“无效的文件引用。该文件的路径无效,或无法找到一个或多个参考架构”的错误。 –