OKButton

 

OKBUTTON starting x position, starting y position, width, Height

 

For selecting options and closing dialog boxes

 

Sub Main ()

    Begin Dialog DialogName1 60, 60, 160, 70, "ASC - Hello"

        TEXT 10, 10, 28, 12, "Name:"

        TEXTBOX 42, 10, 108, 12, .nameStr

        TEXTBOX 42, 24, 108, 12, .descStr

        CHECKBOX 42, 38, 48, 12, "&CHECKME", .checkInt

        OKBUTTON 42, 54, 40, 12

    End Dialog

    Dim Dlg1 As DialogName1

    Dialog Dlg1

 

    MsgBox Dlg1.nameStr

    MsgBox Dlg1.descStr

    MsgBox Dlg1.checkInt

End Sub