第1个回答 2013-09-10
.版本 2.程序集 窗口程序集1
.程序集变量 次数, 整数型.子程序 _按钮1_被单击.判断开始 (编辑框1.禁止 ＝ 假)
编辑框1.禁止 ＝ 真
.默认.判断结束
.判断开始 (文件是否存在 (取运行目录 () ＋ “wj”) ＝ 假)
创建目录 (“哈哈”)
.默认.判断结束
.计次循环首 (到数值 (编辑框1.内容), 次数)
写配置项 (取运行目录 () ＋ “\哈哈\” ＋ 到文本 (次数) ＋ “.rar”, “”, “”, “”)
处理事件 ()
标签1.标题 ＝ “已生成” ＋ 到文本 (次数) ＋ “个文件”
进度条1.位置 ＝ 次数
.计次循环尾 ()
信息框 (“全部文件已经生成完毕，生成的文件在文件夹 哈哈 里面” ＋ #换行符 ＋ “把生成的文件拖到QQ头像就可以了，轰炸时请不要运行其他程序！”, 0, “完成”)
进度条1.位置 ＝ 1
编辑框1.禁止 ＝ 假
标签1.标题 ＝ “”.子程序 _编辑框1_内容被改变进度条1.最大位置 ＝ 到数值 (编辑框1.内容)