递归遍历确定文件总数，两个全局变量：总数，已复制数
光山ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景，ssl证书未来市场广阔！成为创新互联公司的ssl证书销售渠道，可以享受市场价格4-6折优惠！如果有意向欢迎电话联系或者加微信：028-86922220（备注：SSL证书合作）期待与您的合作！
递归复制，每复制一个文件，更新已复制数，更新进度条
计算下文件大小 放个进度条 进度条最大值设成文件大小 再放个 label控件 把百分比显示到上面就行了
这个不象是怎么传递Pr值的问题吧，是不是读取过程中卡啊？
在pr=J 下面加一句My.Application.DoEvents() ，暂时释放一下控制权，使程序去处理完其它事件。再说不需要时间控件，直接在循环过程中修改进度值也可以，然后来一句My.Application.DoEvents()。