贿赂怎么读音是什么:懂VB的朋友请帮我看下

来源：百度文库 编辑：杭州交通信息网 时间：2024/05/01 02:37:48
Private Sub m_saveas_Click()
CommonDialog1.filename = "请更改文件名.txt" '设置默认文件名
CommonDialog1.Filter = "*.txt(文本文件)|*.txt|*.jpg|*.bak|*.swf" '限定文件类型
CommonDialog1.ShowSave '打开保存对话框
If CommonDialog1.filename <> "请更改文件名.txt" Then
filename = CommonDialog1.filename
Else
savetofile CommonDialog1.filename
End If
End Sub

上面的有些代码我添上的注释,还有些不怎么明白,请帮我添上注释,让我明白它的意思,谢谢

Private Sub m_saveas_Click() ''保存文件
CommonDialog1.filename = "请更改文件名.txt" '设置默认文件名
CommonDialog1.Filter = "*.txt(文本文件)|*.txt|*.jpg|*.bak|*.swf" '限定文件类型
CommonDialog1.ShowSave '打开保存对话框
If CommonDialog1.filename <> "请更改文件名.txt" Then ''如果保存的文件名不为默认
filename = CommonDialog1.filename ''文件名就为保存文件时别人输入的文件名
Else
savetofile CommonDialog1.filename ''如果文件名为默认，就直接保存
End If
End Sub

懂VB的朋友请帮我看下 懂VB的朋友帮我看下(这是一个制作记事本的一些代码),我的注释对吗 懂VB的朋友请帮我看看,谢谢 懂乙肝的朋友帮我看下结果 我朋友的胃老是不舒服，请高手帮我看下，谢谢 请帮我看下 请帮我看下 请帮我看下 懂看乙肝结果的朋友来帮我看下什么结果 懂看乙肝结果的朋友来帮我看下什么结果