you're doing a lot of console.readline(s) there ... are you sure you need that many ? how about something like (using one variable to hold the answer, instead of one for yes and no)
Dim answer As String
Console.WriteLine("Hello, Would you like to know why programming is valuable? Yes or No")
StringComparison comparison = StringComparison.OrdinalIgnoreCase
answer = Console.ReadLine
If answer.Contains("yes", comparison) Then
Console.WriteLine("Well...1")
End If
If answer.Contains("no"), comparison Then
Console.WriteLine("Well...2")
End If
note that (if Ive done this correctly), it doesnt matter if they enter 'YES' or 'yES' or 'Yes it does' - the StringComparison and the contains will handle it - you can then do more work on 'answer' in your If/End-If checks
does that make life easier ?