VB SaveFileDialog如果取消

Question

当用户按下SaveFileDialog中的"取消"按钮时，我想重命名textLabel。

Private Sub SaveFileDialog1_FileOk(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles SaveFileDialog1.FileOk
    Label6.Text = "Saved!"
End sub

这适用于"保存"按钮。我不知道该如何为"取消"按钮做。

谢谢

Answer 1

而不是使用该事件，为什么不比较从 ShowDialog()方法返回的结果？

If SaveFileDialog1.ShowDialog() = DialogResult.Ok
    Label6.Text = "Saved!"
Else
    Label6.Text = "Cancelled!"
End If

Answer 2

我更喜欢使用案例

Select Case SaveFileDialog1.ShowDialog()
    Case DialogResult.Ok
        Label6.Text = "Saved!"
    Case DialogResult.Cancel
        Label6.Text = "Cancelled!"
End Select