Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog dlg.Filter= "文件|*.jpg" '设置筛选器 If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮 MessageBox.Show("你要保存为：" & dlg.FileName,"提示") '提示用户选择的文件
If ftp1.Download("\photo\Desert.jpg",dlg.FileName) = True Then End If
加好友 
发短信
Post By：2018/1/27 8:48:00 [显示全部帖子]
