If e.KeyCode = Keys.Enter Then
If txtpay.Text = "" Then
txtchang.Text = ""
Exit Sub
End If
txtchang.Text = CStr(CInt(txtpay.Text.Replace("-", "")) - CInt(txtsumtotal.Text)).Replace("-", "").ToString() ' .replace ("-","")เป็นการตัดเครื่องหมาย ( - ) อกก
End If