[求助]复制文件的进度条问题！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

我在复制文件时，希望做一个复制多少的进度条。可是我不知道进度条的P.Value的值要怎么设置，代码如下

Dim p As WinForm.ProgressBar

p = e.Form.Controls("fjglProgressBar1")

p.Maximum = nm12 '设置最大值

p.Minimum = 0 '设置最小值

p.Value = 0

If FileSys.FileExists(f11) Then

FileSys.CopyFile(f11, ""& fileway &""& dx11("NewName") &"",True)

p.Value = FileSys.GetFileInfo(""& fileway &""& dx11("NewName") &"").Length '设置当前值

End If

请问高手们，该如何设置啊？

主题：[求助]复制文件的进度条问题！