VB.net:如果用户要使用未保存的数据关闭程序,我该如何提示用户？

Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
    If e.CloseReason = CloseReason.UserClosing Then
        Dim result As DialogResult = MessageBox.Show("您有未保存的数据，确定要关闭程序吗？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Warning)
        If result = DialogResult.No Then
            e.Cancel = True
        End If
    End If
End Sub