s=InputBox("Enter two numbers separated by a blank") t=Split(s) a=CInt(t(0)) b=CInt(t(1)) c=a+b MsgBox c