Example - Picture Statement

' This example uses the picture control to show a picture.
Sub Main ()
    Begin Dialog myDialog 60, 60, 175, 125, "Picture Test"
        Text 10, 10, 50, 50, "This is a picture:",.Text1
        Picture 60, 10, 75, 75, "d:\temp\test.bmp",0,.Picture1
        OKButton 10, 100, 40, 12
    End Dialog
    ' Dialog returns -1 For OK
    Dim Dlg1 As myDialog
    button = Dialog(Dlg1)
    If button = -1 Then
        Exit Sub
    End If
End Sub