Sum of Digits of a Given Number using in Vb.Net