Summe ein nicht aktiviert Textfeld aktiviert als Null

Question

i'am mit 9 Textfelder in einer Form, und ich möchte, dass die Anwendung, die Zahlen in einem anderen Etikett in einer anderen Form zu fassen, der Benutzer nicht alle 9 Textfelder ausfüllen , also habe ich 9 Checkboxen benutzt, um jedes Textfeld separat zu aktivieren. das Problem ist, wenn ich die Taste, die die Summe Gleichung ohne die Überprüfung aller 9 Kontrollkästchen und füllen Sie die 9 Textfelder die Anwendung stoppt und zeigt einen Fehler. ich will eine textbox.enabled = false als Null summieren und das ist meine Button-Code:

Private Sub Button1_Click(Sender As Object, e As EventArgs) Handles Button1.Click 
    Me.Hide() 
    Form5.Show() 
    Dim intNum1 As Decimal 
    Dim intNum2 As Decimal 
    Dim intNum3 As Decimal 
    Dim intNum4 As Decimal 
    Dim intNum5 As Decimal 
    Dim intNum6 As Decimal 
    Dim intNum7 As Decimal 
    Dim intNum8 As Decimal 
    Dim intNum9 As Decimal 
    intNum1 = Decimal.Parse(TextBox1.Text) 
    intNum2 = Decimal.Parse(TextBox2.Text) 
    intNum3 = Decimal.Parse(TextBox3.Text) 
    intNum4 = Decimal.Parse(TextBox4.Text) 
    intNum5 = Decimal.Parse(TextBox5.Text) 
    intNum6 = Decimal.Parse(TextBox6.Text) 
    intNum7 = Decimal.Parse(TextBox7.Text) 
    intNum8 = Decimal.Parse(TextBox8.Text) 
    intNum9 = Decimal.Parse(TextBox9.Text) 
    Form5.Label1.Text = intNum1 + intNum2 + intNum3 + intNum4 + intNum5 + intNum6 + intNum7 + intNum8 + intNum9 

Answer 1

Sie

intNum1 = Val(TextBox1.Text) 

Statt

intNum1 = Decimal.Parse(TextBox1.Text)