文件菜单里保存命令vb代码怎么写？vb源码下载

Text1.Textclose #1

文件菜单里保存命令vb代码怎么写？

CommonDialog1.ShowSave Open CommonDialog1.FileName For Output As 1 Write #1, Text1.Textclose #1