请问richtextbox的saveas是怎么实现的？

Question

我的窗体上有一个richtextbox，一个“另存为”按钮
我想按一下按钮就能弹出一个对话框，可以把richtextbox里的
文本存为一个自己选择的路径下的文本文档，可以实现吗？

Answer 1

Private Sub Command1_Click()
    CommonDialog1.ShowSave
    RichTextBox1.SaveFile CommonDialog1.FileName, rtfCFText
End Sub

Answer 2

这个我知道，我在搜索里看到有这样的帖子，我要保存为以
.txt格式的，怎么搞？

Answer 3

我说的不是TXT格式吗？!
试一下吧!!