SUB DXDH 
   z$(1)="分區(qū)（單站）分析"
   z$(2)="分區(qū)綜合分析"
   dialog
   title"歡迎您選擇工作分區(qū)" 
   position 440,200               
   control radiogroup
   title "分區(qū)（單站）;分區(qū)綜合分析"
   position 30,0   '30,8
   into R                       
   control okbutton
   title "確定"
   position 10,40
   control cancelbutton
   title "取消"
   position 60,40
   IF R=0 THEN EXIT SUB END IF
   NOTE  "您選擇了"+z$(R)
END SUB