Guarde fácilmente los elementos del cuadro combinado de idiomas como texto, urgente, urgente

.Versión 2

.Ventana de ensamblaje Ensamblaje 1

.Subroutine__Launch Window_Created

ComboBox1.Current Checked Items = -1

ComboBox1.Agregar elementos ("Sandía", 0)

ComboBox1.Agregar elementos ("Sydney", 1)

ComboBox1.agregar elemento ( "Apple", 2 )

. Subrutina _ComboBox1_ListItemsSelected

Inicio del juicio (ComboBox1.elemento seleccionado actual = 0)

EditBox1.content = al texto ("¡Sandía! Quiero un bocado). !")

. Juicio (ComboBox1. Elemento seleccionado actualmente = 1)

EditBox1.content = Texto devuelto ("¡Sydney! ¡Dale un mordisco!")

.Judge (ComboBox1.selección actual = 2)

EditBox1.content = Devuelve texto ("¡Manzanas! ¡Quieres un bocado!")

.Default

Cuadro de edición 1.content = al texto ("").