How To Save Content Of RichTextBox?

Save Your Content Using SaveFileDialogBox To Your Location.....

'On The Save Button's Click Event...

Private Sub btnLoad_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLoad.Click
       If SaveFileDialog1.ShowDialog = DialogResult.OK Then
            filename = SaveFileDialog1.FileName
            RichTextBox1.SaveFile(filename)
        End If
End Sub