1.     令 Form1.InputBox2.Visible = False
  2.     令 Form1.InputBox3.Visible = False
  3.     令 Form1.InputBox4.Visible = False
  4.     令 Form1.InputBox5.Visible = False
  5.     令 Form1.InputBox6.Visible = False
  6.     令 Form1.Label2.Visible = False
  7.     令 Form1.Label3.Visible = False
  8.     令 Form1.Label4.Visible = False
  9.     令 Form1.Label5.Visible = False
  10.     令 Form1.Label6.Visible = False
  11.     令 Form1.Label7.Visible = False
  12.     令 Form1.Label8.Visible = False
  13. 条件结束
  14. (语句无法识别，可能有错误): End Event
  15. 注释：======================================================================欢迎使用独处软件
  16. Event(Form1.前台幻师学校.Click)
  17. 如果 Form1.前台幻师学校.Visible 则
  18.     令 Form1.InputBox1.Visible = False
  19.     令 Form1.InputBox2.Visible = False
  20.     令 Form1.InputBox3.Visible = False
  21.     令 Form1.InputBox4.Visible = False
  22.     令 Form1.InputBox5.Visible = False
  23.     令 Form1.InputBox6.Visible = False
  24.     令 Form1.Label2.Visible = False
  25.     令 Form1.Label3.Visible = False
  26.     令 Form1.Label4.Visible = False
  27.     令 Form1.Label5.Visible = False
  28.     令 Form1.Label6.Visible = False
  29.     令 Form1.Label7.Visible = False
  30.     令 Form1.Label8.Visible = False
  31. 条件结束
  32. (语句无法识别，可能有错误): End Event
  33. 注释：======================================================================欢迎使用独处软件
  34. Event(Form1.农场.Click)
  35. 如果 Form1.农场.Visible 则
  36.     令 Form1.InputBox1.Visible = False
  37.     令 Form1.InputBox2.Visible = False
  38.     令 Form1.InputBox3.Visible = False
  39.     令 Form1.InputBox4.Visible = False
  40.     令 Form1.InputBox5.Visible = False
  41.     令 Form1.InputBox6.Visible = False
  42.     令 Form1.Label2.Visible = False
  43.     令 Form1.Label3.Visible = False
  44.     令 Form1.Label4.Visible = False
  45.     令 Form1.Label5.Visible = False
  46.     令 Form1.Label6.Visible = False
  47.     令 Form1.Label7.Visible = False
  48.     令 Form1.Label8.Visible = False
  49. 条件结束
  50. (语句无法识别，可能有错误): End Event
  51. 注释：======================================================================欢迎使用独处软件
  52. Event(Form1.Load)
  53. 弹出窗口 "欢迎使用独处软件--YY频道:41522662"
  54. (语句无法识别，可能有错误): End Event
  55. 注释：======================================================================欢迎使用独处软件
  56. Event(Form1.UnLoad)
  57. 弹出窗口 "谢谢你的使用"
  58. (语句无法识别，可能有错误): End Event
  59. 注释：======================================================================欢迎使用独处软件
  60. Event(Form1.InputBox7.Change)
  61. 如果 Form1.InputBox7.Text >= 100 则
  62.     令 Form1.InputBox7.Text = 1
  63.     弹出窗口 "请输入数字1--99"
  64. 否则
  65. 条件结束
  66. (语句无法识别，可能有错误): End Event