'Create name and age variables
name = ""
ageStr = ""
'Prompt User For Name and Age
WScript.StdOut.Write("Please Enter your Full Name...............")
name = Wscript.StdIn.ReadLine()
WScript.StdOut.WriteLine() 'Skip 1 line
Wscript.StdOut.Write("Please Enter Your Age.............")
ageStr=Wscript.StdIN.ReadLine()
'Calculate Age+10 and assign to ageStr10
ageStr10 = CStr( CInt(ageStr)+10 )
'Display Name and Age Values
Wscript.StdOut.WriteBlankLines(2) 'Skip 2 lines
WScript.StdOut.WriteLine("Your Name is " & vbTab & vbTab & name)
WScript.StdOut.WriteLine("Your Age is " & vbTab & vbTab & ageStr)
WScript.StdOut.WriteLine(vbCrLf & "Your Age in 10 Years is ....... " & ageStr10 & vbCrLf)
Wscript.StdOut.WriteLine("End of Program")
name = ""
ageStr = ""
'Prompt User For Name and Age
WScript.StdOut.Write("Please Enter your Full Name...............")
name = Wscript.StdIn.ReadLine()
WScript.StdOut.WriteLine() 'Skip 1 line
Wscript.StdOut.Write("Please Enter Your Age.............")
ageStr=Wscript.StdIN.ReadLine()
'Calculate Age+10 and assign to ageStr10
ageStr10 = CStr( CInt(ageStr)+10 )
'Display Name and Age Values
Wscript.StdOut.WriteBlankLines(2) 'Skip 2 lines
WScript.StdOut.WriteLine("Your Name is " & vbTab & vbTab & name)
WScript.StdOut.WriteLine("Your Age is " & vbTab & vbTab & ageStr)
WScript.StdOut.WriteLine(vbCrLf & "Your Age in 10 Years is ....... " & ageStr10 & vbCrLf)
Wscript.StdOut.WriteLine("End of Program")