none
Menú con este lengueje. RRS feed

  • Pregunta

  • Hola:

    Quiero hacer un menú sencillo con el lenguaje YaBasic y es compatible con Windows 10.

    Ver enlace.

    Tengo hecho un menú con la consola de C#, quiero imitarlo pero poco se de este lenguaje. Haber si alguien que sepa adaptar el código de C# en YaBasic.

    Código C#:

    using System;
    
    namespace Menu_y_opciones_consola
    {
        class Program
        {
            static void Main(string[] args)
            {
                // Título de la ventana.
                Console.Title = "Menú y opciones C# 2017";
    
                // Tamaño ventana consola.
                Console.WindowWidth = 30; // X. Ancho.
                Console.WindowHeight = 10; // Y. Alto. 
    
                // Cursor invisible.
                Console.CursorVisible = false;
    
                // Posición del mansaje en la ventana.
                Console.SetCursorPosition(0, 0);
                Console.Write(@"Elija una opción:
    
            1- Opción A.
            2- Opción B.
            3- Opción C.
            Escape- Salir.
    ===========================");
    
                ConsoleKey key;
    
                do
                {
                    // Cursor invisible
                    Console.CursorVisible = false;
    
                    // Lee cualquier tecla.
                    key = Console.ReadKey(true).Key;
    
                    // Variable de mensaje vacío.
                    string mensaje = string.Empty;
    
                    // Leer tecla selecconada por el usuario.
                    switch (key)
                    {
                        case ConsoleKey.D1: // Tecla principal 1.
                        case ConsoleKey.NumPad1: // Tecla extendida 1.
                            Console.SetCursorPosition(0, 8);
                            mensaje = "OPCIÓN A."; // Mostrar mensaje en pantalla.
                            break;
    
                        case ConsoleKey.D2:
                        case ConsoleKey.NumPad2:
                            mensaje = "OPCIÓN B.";
                            break;
                        case ConsoleKey.D3:
                        case ConsoleKey.NumPad3:
                            mensaje = "OPCIÓN C.";
                            break;
                    }
    
                    // Posición de los mensajes.
                    Console.SetCursorPosition(0, 8);
                    Console.Write("             "); // 13 espacios.
                    Console.SetCursorPosition(0, 8);
                    Console.Write(mensaje);
    
                }
    
                // Salir de la plicación al pulsar la tecla Escape o número 4.
                while (key != ConsoleKey.Escape);
            }
        }
    }

    Lo veo complicado porque apenas conozco el lenguaje de YaBasic, pero quiero trastear un poco en la versión de PC, para luego pasarlo a PS2, la famosa demo que vino en su tiempo con YaBasic.

    Saludos.


    http://electronica-pic.blogspot.com


    • Editado Metaconta domingo, 1 de abril de 2018 16:22
    domingo, 1 de abril de 2018 16:17