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