Hi guys
i am new to the VB and i need your help to sort out the below problem

Im using below simple code by passing these values 898098878(param1) 7768978989(param2) and unfortunately getting the this error RUNTIME ERROR "6" Overflow.


Private Sub CommandButton5_Click()
Dim param1 As Long
Dim param2 As Long

param1 = gross.Text
param2 = eprem.Text

TextBox2 = Format((param1& / param2&), "0.00%")
TextBox1 = param1& + param2&

End Sub