using C = System.Console;
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
 
namespace Propiedades
{
 
    class Program
    {
 
        static void configuracion()
        {
            C.Title = "Ejemplo del uso de propiedades en C Sharp";
            C.SetWindowSize(70, 30);
            C.BackgroundColor = System.ConsoleColor.Blue;
            C.ForegroundColor = System.ConsoleColor.Yellow;
            C.Clear();
        }
        static bool bValido(string sCadena)
        {
            sCadena = sCadena.ToUpper();
            if (string.IsNullOrEmpty(sCadena)) return false;
            for (int i = 0; i < sCadena.Length; i++)
            {
                char cTemp = Convert.ToChar(sCadena[i]);
                int iAscii = (int)cTemp;
                if (!bAscii(iAscii)) return false;
            }
            return true;
        }
        static bool bAscii(int iAscii)
        {
            if (iAscii < 65 || iAscii > 91)
            {
                return false;
            }
            return true;
        }
 
        static void ingDatos()
        {
            Personas per = new Personas();
 
            byte mLeft = 2, mTop = 2;
            while (true)
            {
                C.SetCursorPosition(mLeft, mTop);
                C.Write("Ingrese nombre.....:");
                string linea = C.ReadLine();
                if (!bValido(linea))
                {
                    mTop += 2;
                    C.SetCursorPosition(mLeft, mTop);
                    C.Write("El dato es obligatorio... (Pulse una tecla para continuar)");
                    C.ReadKey();
                    C.Write("                                                             ");
                    mTop -= 2;
                }
                else
                {
                    per.nom = linea;
                    break;
                }
            }
 
            mTop += 2;
            while (true)
            {
                C.SetCursorPosition(mLeft, mTop);
                C.Write("Ingrese apellido...:");
                string linea = C.ReadLine();
                if (!bValido(linea))
                {
                    mTop += 2;
                    C.SetCursorPosition(mLeft, mTop);
                    C.Write("El dato es obligatorio... (Pulse una tecla para continuar)");
                    C.ReadKey();
                    C.Write("                                                             ");
                    mTop -= 2;
                }
                else
                {
                    per.ape = linea;
                    break;
                }
 
            }
 
            mTop += 2;
            while (true)
            {
                byte n = 0;
                C.SetCursorPosition(mLeft, mTop);
                C.Write("Ingrese edad.......:");
                if (byte.TryParse(C.ReadLine(), out n))
                {
                    per.eda = n;
                    break;
                }
                else
                {
                    mTop += 2;
                    C.SetCursorPosition(mLeft, mTop);
                    C.Write("Ingreso incorrecto... (Pulse una tecla para continuar)");
                    C.ReadKey();
                    C.Write("                                                             ");
                    mTop -= 2;
                }
            }
        }
 
        public class Personas
        {
            private string nombre;
            private string apellido;
            private byte edad;
 
            public string nom
            {
                get { return nombre; }
                set { nombre = value; }
            }
 
            public string ape
            {
                get { return apellido; }
                set { apellido = value; }
            }
 
            public byte eda
            {
                get { return edad; }
                set { edad = value; }
            }
        }
 
        static void Main(string[] args)
        {
            configuracion();
 
            ingDatos();
 
            C.SetCursorPosition(02, 08);
            C.Write("Pulse una tecla para cerrar la aplicación...");
            C.ReadLine();
        }
    }
}

Dim sCadena As String = "123?%"
For Each cCaracter In sCadena
    MsgBox(Asc(cCaracter))
Next

#include<iostream>
using std::cout;
using std::cin;
using std::endl;
int main()
{
	int i=0;
	for (i=5;i<=100;i++)
	{		
	    cout<<i<<endl;
	}
	cin.get();
	return EXIT_SUCCESS;
}