Example:

  1. Sub Main ()

    1. Begin Dialog DialogName1 60, 70, 160, 50, "ASC - Hello"

      1. CHECKBOX 42, 10, 48, 12, "&CHECKME", .checkInt

        OKBUTTON 42, 24, 40, 12

      End Dialog

      Dim Dlg1 As DialogName1

      Dialog Dlg1

      If Dlg1.checkInt = 0 Then

      1. Q = "didn't check the box."

      Else

      1. Q = "checked the box."

      End If

      MsgBox "You " & Q

    End Sub