vb如何实现存储

窗体上添加button按钮和text1控件，和CommonDialog控件，一共3个

CommonDialog 控件是一种ActiveX控件，一般情况下，启动VB后，在工具箱中没有公用对话框控件。要使用对话框控件，首先要在工具箱中添加公用对话框控件，步骤如下：
1）“工程”----->“部件”：
2）在“部件”对话框中选择“控件”选项卡，在控件列表框中选择“Microsoft common Dialog control 6.0"
3）单击“确定”，公用对话框就被添加到工具箱中
4）再将此控件拖放到窗体上

以下示例将text1中的文本保存到无标题文件中：

Private Sub Command1_Click()
On Error GoTo kk
CommonDialog1.FileName = "无标题.txt"
CommonDialog1.DefaultExt = "Txt"
CommonDialog1.Filter = "(*.txt)|*.txt|(*.*)|*.*"
CommonDialog1.ShowSave
Open CommonDialog1.FileName For Output As #1
Print #1, Text1.Text
Close #1
kk:
End Sub

建特殊形状的按钮方法有两种，一种是用图片框控件，另一种是用api函数，那比较复杂，建议你先学些基本的api函数的知识，再来解决这个问题，ok?

上面的问题有人回答了：我补充：“创建特殊形状的按钮”建意用图片按扭.

CommonDialog1.ShowSave