使用MessageDialog弹出UWP-VB错误消息

Question

我在UWP刚起步，所以对我来说很难。 我正在创建一些基本的计算器，以开始了解可以吃些什么。 我遇到了一些小问题，那就是弹出窗口的错误处理。

        On Error Resume Next
    Dim check2 As Double
    check2 = YA_txt.Text * 1
    If Error.Number = 0 Then GoTo XA
    If Error.Number > 0 Then GoTo error2
error2:
        If Error.Number = 13 Then
            MsgBox("Wrong coordinates", MsgBoxStyle.Exclamation + MsgBoxStyle.OkOnly, "Error")
    End If

但是现在我没有MsgBox，没有MessageDialog，但是它是异步的，不能与Error and Resume一起使用...我该如何处理？

谢谢你的帮助 ：）

Answer 1

您可以使用try catch而不是on error，并且您将根据错误的类型显示消息。

Try
    Dim check2 As Double
    check2 = TextBox1.Text * 1
Catch ex As ArithmeticException 'type exception
    Dim dialog = New MessageDialog("Wrong coordinates")
    dialog.Title = "Error"
    dialog.Commands.Add(New UICommand() With { Key.Label = "Ok", Key.Id = 0})
    dialog.Commands.Add(New UICommand() With { Key.Label = "Cancel", Key.Id = 1})
    Dim res = Await dialog.ShowAsync()
Catch ex As ArgumentException
    '...
'Catch ....

End Try