[asemshahen5]

ضع في قسم التصاريح :

كود :

   Dim inte1 As Integer = 0
   Dim ExitDel As String = String.Empty