Sub Globals
'Declare the global variables here.
End Sub
Sub App_Start
AddForm("Form1","Form1")
AddLabel("Form1","Label1",5,160,85,20,"You selected: ")
AddLabel("Form1","Label2",95,160,135,20,"")
AddListBox("Form1","ListBox1",50,25,130,115)
ListBox1.Add("red")
ListBox1.Add("green")
ListBox1.Add("blue")
ListBox1.Add("black")
ListBox1.Add("yellow")
ListBox1.Add("white")
ListBox1.Add("brown")
ListBox1.Add("orange")
ListBox1.Add("pink")
Form1.Show
End Sub
Sub ListBox1_SelectionChanged(Index, Value)
Label2.Text = Value
End Sub