1. Event(Form1.CheckBox1.Click)
  2. 调用 单选(1)
  3. (语句无法识别,可能有错误): End Event
  4. Event(Form1.CheckBox2.Click)
  5. 调用 单选(2)
  6. (语句无法识别,可能有错误): End Event
  7. Event(Form1.CheckBox3.Click)
  8. 调用 单选(3)
  9. (语句无法识别,可能有错误): End Event
  10. Event(Form1.CheckBox4.Click)
  11. 调用 单选(4)
  12. (语句无法识别,可能有错误): End Event
  13. 子程序 单选(xx)
  14.     如果 xx <> 1 则
  15.         令 Form1.CheckBox1.Value = 0
  16.     条件结束
  17.     如果 xx <> 2 则
  18.         令 Form1.CheckBox2.Value = 0
  19.     条件结束
  20.     如果 xx <> 3 则
  21.         令 Form1.CheckBox3.Value = 0
  22.     条件结束
  23.     如果 xx <> 4 则
  24.         令 Form1.CheckBox4.Value = 0
  25.     条件结束
  26. 子程序结束