单选对话框.mb

来自「mabasic 经典使用案例。主要关于菜单建立」· MB 代码 · 共 20 行

SUB DXDH 
   z$(1)="分区（单站）分析"
   z$(2)="分区综合分析"
   dialog
   title"欢迎您选择工作分区" 
   position 440,200               
   control radiogroup
   title "分区（单站）;分区综合分析"
   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