You must ensure all input values were correct before performing calculation.
I suggest TryParse instead Try Catch block
If Integer.TryParse(txtQty.Text, qty) AndAlso Integer.TryParse(txtRate.Text, rate) AndAlso Integer.TryParse(txtDisc.Text, disc) AndAlso (disc > 0) Then
total = qty * rate
amt = total / disc
total1 = total - disc
txtAmt.Text = Convert.ToInt32(total1).ToString()
Else
End If