用易语言该如何写，指点 一下就好，有源码更好
.版本 2
.子程序 _按钮1_被单击
.如果 (复制文件夹 (“D:\youxi\cjsh”, “E:\youxi\cjsh”, ) ＝ 真)
信息框 (“复制文件夹成功！”, 0, )
.否则
信息框 (“复制文件夹失败！”, 0, )
.如果结束
.子程序 复制文件夹, 逻辑型, 公开, 成功返回真，失败返回假
.参数 被复制的文件夹, 文本型
.参数 复制到的文件夹, 文本型
.参数 是否处理事件, 逻辑型
.局部变量 路径, 文本型
.局部变量 被复制的文件夹数组, 文本型, , "0"
.局部变量 复制到的文件夹文本, 文本型
.如果真 (寻找文件 (被复制的文陆搭件夹, #子目录) ＝ “”)
.如果真 (寻找文件 (被复制的文件夹, #存档文件 ＋ #只读文件 ＋ #隐藏文件 ＋ #系统文件) ≠ “”)
返回 (复制文件 (被复制的文件夹, 复制到的文件夹))
.如果真结束
返回 (假)
.如果真结束
.如果真 (创建目录 (复制到的文件夹) ＝ 假 且 寻找文件 (复制到的文件夹, #子目录) ＝ “” 且 位与 (取文件属性 (复制到的文件夹), #子目录) ＝ 0 且 取文本长度 (复制到的文件夹) ＞ 3)
返回 (假)
.如果真结束
路径 ＝ 被复制的文件夹
.如果真 (取文本右边 (路径, 1) ≠ “\”)
路径 ＝ 路径 ＋ “\”
.如果真结束
加入成员 (被复制的文件夹数组, “”)
复制到的文件夹文本 ＝ 复制到的文件夹
.如果真 (取文本右边 (复制到的文件夹文本, 1) ≠ “\”)
复制到的文件夹文本 ＝ 复制到的扰汪文件夹文本 ＋ “\”
.如果真结束
返回 (复制文件夹 (路径缓悉仔, 被复制的文件夹数组, 复制到的文件夹文本, 是否处理事件))
复者培制文件
复首巧唯宽派制文件(“D:\youxi\cjsh.exe”,“E:\youxi\cjsh.exe”)
复制文件夹
复制目录(“D:\youxi\cjsh”,“E:\youxi\cjsh”)
Key赤月神社の美夜赤月为你解答~