Microsoft Small Basic

Program Listing: QQV366
' Display the text window and clear its contents.
' Show and Clear are not really needed here, but they are included for demonstration.
TextWindow.Show()
TextWindow.Clear()
' Highlight the text window's text in yellow and change the text's color to blue.
TextWindow.BackgroundColor = "Yellow"
TextWindow.ForegroundColor = "Blue"
' Position the cursor 15 columns from the left and 10 rows from the top of the text window.
TextWindow.CursorLeft = 15
TextWindow.CursorTop = 10
' Position the text window 200 pixels to right and 400 pixels down from the upper-left edge of the screen.
TextWindow.Left = 200
TextWindow.Top = 400
' Set the text window's title bar text.
TextWindow.Title = "This is My Title!"
' Get information from the user and then display it back to the user.
TextWindow.WriteLine("Type some text:")
myText = TextWindow.Read()
TextWindow.WriteLine("Type a number:")
myNumber = TextWindow.ReadNumber()
TextWindow.Write("You typed " + myText + " and " + myNumber + ". ")
' Wait for the user to do something and then hide the text window.
' Pause and Hide are not really needed here, but they are included for demonstration.
TextWindow.Pause()
TextWindow.Hide()