ปัญหา error Arithmetic operation resulted in an overflow. รบกวนช่วยดูหน่อยนะค่ะ

Dim total As Integer
                    
                    Dim costWater1 As Integer = Convert.ToInt32(costWater)
                    Dim costElec1 As Integer = Convert.ToInt32(costElec)
                    Dim priceITN1 As Integer = Convert.ToInt32(priceITN)
                    Dim priceUBC1 As Integer = Convert.ToInt32(priceUBC)
                    Dim priceRoom1 As Integer = Convert.ToInt32(priceRoom)

                    total = costWater + costElec + priceITN + priceUBC + priceRoom 'บรรทัดนี้มีปัญหาค่ะ