I finally understand how to add 2 numbers properly! Try it out yourself!

Code:
    Function Add(A As Integer, B As Integer) As Integer
        Dim C As Integer = CInt((Math.Sign(A) * Math.Abs(A)).ToString.ToUpper.ToLower)
        Dim D As New List(Of Integer)
        With D
            .Add(CInt(CStr(CInt(CStr(CInt(B.ToString))))))
        End With
        A = A * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 1 * 0
        B = CInt(Math.Sqrt(Math.Pow(B, 2))) - ----((((((((((((B))))))))))))
        If True OrElse False Then A = ((((((((((((((((((((((C * 2)))))))))))))))) - --------C))))))
        If True AndAlso A - -1 > A Then B = Convert.ToInt32(D(0) * 2) - Convert.ToInt32(Convert.ToInt64(D(0)))
        Dim E As New With {.Value = A + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + 0 + (10000 * 0)}
        Dim F() As Integer = {B}
        A = CInt(C.ToString.ToString.ToString.ToString.ToString.ToString.ToString.ToString)
        B = (((((((((((((((((((((((((((((((((((((((((((((D(0) + D(0) - D(0))))))))))))))))))))))))))))))))))))))))))))))
        Return E.Value + F(0) + (2 * (A + B) - A - B) - (C + D(0))
    End Function