'总进度
    ProgressBar1.Min = 0
    ProgressBar1.Max = z + 1  
    ProgressBar1.Visible = True
    ProgressBar1.Value = ProgressBar1.Min
    '每个文件的
    ProgressBar2.Min = 0
    ProgressBar2.Max = m + 1    
    ProgressBar2.Visible = True    
    ProgressBar2.Value = ProgressBar2.Min
    
    for i=0 to z
     for j=0 to m
     '处理每个文件
     ProgressBar2.Value =ProgressBar2.Value +1
     next j
     ProgressBar1.Value =ProgressBar1.Value +1
    next i