STATIC PUBLIC SUB Main()'Len(myString) returns the length of a string
hForm AS Fmain
hForm = NEW Fmain
hForm.show
END
PUBLIC SUB _new()
TextLabel2.Text = "See the first and last character of your INPUT!"
END
PUBLIC SUB Button1_Click()
inword AS String
outword AS String
inword = TextBox1.Text
outword = Mid(inword, 1, 1)
outword = outword & Mid(inword, Len(inword), 1)
TextLabel1.Text = outword END