Get input using inputbox, and then sum of digits (2digit) and display using msgbox in vb6(visual basic)

Private Sub Form_Load()

Dim a, b, c As Integer

a = Int(InputBox("enter a number"))

b = a Mod 10

c = a \ 10

d = b + c

MsgBox (d)

End Sub