คำนวนใน Visual Studio 2010 (VB.Net) แล้วผลลัพธ์ที่ได้มันผิดพลาดช่วยดูโค้ดให้หน่อยนะคะ

Private Sub txtCredit_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtCredit.KeyUp

 If txtSumUp.Text = "" Then

 MessageBox.Show("คุณกรอกข้อมูลไม่ครบ", "ผิดพลาด", MessageBoxIcon.Error)
 'ก็ให้ทำการโชว์กล่องข้อความ บอกว่าคุณกรอกข้อมูลไม่ครบ 
Else
 Dim sa, na As Integer
 sa = If(txtCredit.Text = "", 0, txtCredit)
 na = txtSumUp.Text

 txtTotal.Text = na - sa
 End If
 end sub
'ผลลัพธ์ทีได้เมื่อคำนวน เช่น txtsumup = 3000 txtcredit 200 ผลลัพธ์ของ txtTotal = 2980 ผิดตรงไหนหรอคะ