Explicación de código simple

[izra76]

Saludos. Se lo que hace el código siguiente (mostrar el código unicode de cada caracter introducido) pero no entiendo del todo como lo hace, es decir, por que define esas constantes al inicio y por que al inicio del While se encuentra esa condición de (car > -1)... Supongo lo que hacen pero si alguien fuera tan amable de explicármelo claramente se los agradecería.

Gracias.

Código (vbnet) [Seleccionar] Expandir

Imports System
Module Test
Public Sub Main()
Const CR As Integer = 13, LF As Integer = 10
Dim car As Integer

Console.WriteLine("Introduzca texto.")
Console.WriteLine("Para terminar pulse Ctrl+z\n")
car = Console.Read()
While (car > -1)
If (car <> CR And car <> LF) Then
Console.WriteLine("El código Unicode de " & _
Convert.ToChar(car) & " es " & car)
End If
car = Console.Read()
End While
End Sub
End Module

[Keyen Night]

Parece traducido desde otro lenguaje \n no es válido como salto de línea en .Net esto ó para expresar un carácter por su ASCII tampoco es válido.

El While (car > -1) es por que se toma un carácter dentro del While este va a ser diferente de -1 siempre que el usuario haya introducido un valor. Y las constantes 10 y 13 pertenecen a las teclas Enter e Intro, que hacen que cada valor sea impreso.