1

作成しているモジュールに「trycatch」ステートメントを追加したいと思います。キャッチする例外を数値形式で指定したい。これはサンプルコードです、

    Try
       interest = me.txtInterest.text
       principal = me.txtPrincipal.text
       totalPayment = interest + principal
    Catch ex As Exception 'What is the proper exception for Number Format?
        MsgBox("Number Format Error")
    End Try

数値形式の例外を指定したい。どうすればそれができますか?

4

2 に答える 2

2

このサンプルコードを使用してください

   Try
            Dim no1 As Integer = Int16.Parse(Me.TextBox1.Text)
            Dim no2 As Integer = Int16.Parse(Me.TextBox2.Text)
            Dim toatlPayment As Integer = no1 + no2


        Catch ex As FormatException
            MessageBox.Show(ex.Message)

        End Try
于 2013-02-21T12:03:56.850 に答える
0

例外をキャッチする代わりに、それが有効な数値かどうかを確認できます

If Int32.TryParse(me.txtInterest.text, interest) AndAlso Int32.TryParse(me.txtPrincipal.text, principal) Then
    totalPayment = interest + principal
Else
    MsgBox("Number Format Error")
End If
于 2013-02-21T18:14:16.577 に答える