Example:
Sub Main ()
Begin Dialog DialogName1 60, 70, 160, 50, "ASC - Hello"
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
Else
Q = "checked the box."
End If
MsgBox "You " & Q
End Sub