RosettaCodeData/Task/A+B/VBScript/a+b-1.vb
2023-07-01 13:44:08 -04:00

6 lines
105 B
VB.net

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