添加一个SaveFileDialog，在保存excle选择时候添加
成都创新互联公司是一家集网站建设,牡丹企业网站建设,牡丹品牌网站建设,网站定制,牡丹网站建设报价,网络营销,网络优化,牡丹网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。
SaveFileDialog1.show（）
用法跟OpenFileDialog相同
可以用SaveFileDialog1对话框加上对文件数据操作的类来实现，，用richtextbox自己的属性方法也能行！我以前做过一个记事本程序就是那样的！
你就不能这样保存么？ ↓
Static SaveNumber as Integer
SaveNumber += 1
Dim SavePath as String = "C:\ytakqi" SaveNumber ".png"
bit.Save(SavePath)