[بدري]

استخدم النوع BigInteger بدلا من Integer ولكن لتتمكن من استخدامه
عليك بادراج المكتبه System.Numerics.dll الى المشروع عن  طريق الرفرنس References


قم بتحويل نوع الارقام الى نفس النوع BigInteger قبل عمليه الضرب لتتلافى الاخطاء
Dim G As BigInteger = CType(B, BigInteger) * CType(D, BigInteger)

ولعرض الرقم في مربع نص لابد من تحويله الى نص ToString بخلاف الانواع المعروفه سابقا
Offer.Text = G.ToString

وتستطيع تنسيقه بهذا الكود وستلاحظ انه حتى عند التنسيق يجب ان يكون نصا اي ToString
Offer.Text = FormatNumber(G.ToString, 0)