ذخیره کردن یک نوشته با پسوندtxt(نوشتاری)

به طور فرض من ماشین حاسبی نوشتم می خواهم جوابی را که Text1 به من می ده با زدن دکمهSave ذخیره شه چه کارکنم لطفا؟
و یکی دیگه اینگه تا رویSave Memory در حافظه Clipboard برود(خواهش میکنم بگین)؟

اگه می خوای تو فایل ذخیره کنی:

کد:

---

Open App.Path & "\filename.txt" For Output As #1
Print #1, Text1.Text
Close #1

---

اگه می خوای تو Clipboard ذخیره و بازیابی کنی:

کد:

---

Private Sub Command1_Click()
Clipboard.SetText Text1.Text
End Sub

Private Sub Command2_Click()
Text1.Text = Clipboard.GetText()
End Sub

---

سلام
این راه حل که دوستمون گفته کاملا صحیح و متین هستش ولی شما اگه میخواین که مسیر رو خودتون انتخاب کنین و اونم تو commonDialog که هم گرافیکی ترم هستش. میشه.
ولی به هر حال این راه هم هستش.
با تشکر.