MS Small Basic: el objeto Controls (código)


controls1Hemos aprendido a usar diferentes objetos en Small Basic, como GraphicsWindow, Shapes, File y Math.

Usando el objeto Controls, puede insertar controles simples como cajas de texto y botones en la ventana de gráficos.

AddTextBox (agregar caja de texto): Agrega una caja de texto a la ventana de gráficos. Debe especificar las coordenadas X e Y de la caja de texto como parámetros.

AddButton (agregar botón):

Agrega un botón a la ventana de gráficos. Debe especificar el título del botón y sus coordenadas X e Y.

GetButtonCaption (obtener título del botón):
Obtiene el título de un botón. Debe especificar el nombre apropiado del botón como parámetro.

SetButtonCaption (establecer título del botón): Cambia el título de un botón. Debes especificar el nombre del botón y el nuevo título como parámetros.

GetTextBoxText (obtener texto de la caja de texto): Obtiene el texto presente en la caja de texto dando el nombre de la caja de texto como parámetro de esta operación.

SetTextBoxText (establecer texto de la caja de texto): Define el texto que aparece en la caja de texto. Debe especificar el nombre de la caja de texto y el texto requerido como parámetros.

Exploremos el objeto Controls con la ayuda de un ejemplo.

  1. GraphicsWindow.Title = “El      objeto Controls”
  2. GraphicsWindow.DrawText(50,      100, “Escriba su nombre:”)
  3. nombre =      Controls.AddTextBox(200, 100)
  4. GraphicsWindow.DrawText(50,      150, “Escriba su apellido:”)
  5. apellido =      Controls.AddTextBox(200, 150)
  6. botónMostrar =      Controls.AddButton(“Mostrar mensaje”, 150, 200)
  7. mensaje =      Controls.AddMultiLineTextBox(50, 250)
  8. Controls.SetSize(mensaje, 310,      50)
  1. Controls.ButtonClicked =      MostrarMensaje
  1. Sub MostrarMensaje
  2. If      Controls.GetButtonCaption(botónMostrar) = “Mostrar mensaje”      Then
  3. Controls.SetTextBoxText(mensaje,”Hola      ” + Controls.GetTextBoxText(nombre) + ” ” +      Controls.GetTextBoxText(apellido))
  4. EndIf
  5. EndSub

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s