{currenthelptext} {product} {helptype} {viewcore}

1. Sub Main ()

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

      1. 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