VB模拟文件传输

文件传输是将文件从一个计算机系统传到另一个计算机系统。它能把文件传输到另一计算机中去存储，访问远程计算机上的文件，获取另一计算机上的数据进行处理，把文件传输至打印机……一般传输文件时会出现进度条，Windows10的进度条会提示进度百分比、传输速度、剩余时间等信息。网速的快慢会影响传输速度，今天我们用VB编程一个文件传输进度条，由于没有文件实际传输仅模拟传输的过程，还可以手动控制快慢。

编程前，先明确自己的需求：模仿制作一个文件传输的进度条，以及控制进度条的快慢。为完成需求选择使用标签、滚动条、按钮和时钟组件。标签用来说明进度条加载状态，文件传输过程会显示文件传输进度百分比;滚动条控制传输速度，左快右慢，可以通过移动来观察进度条的变化情况;时钟用于控制传输快慢。两个按钮“开始/停止”与“结束”。当文件传输完成后，弹出提示框“传输结束”。

當点击开始按钮后，时钟启动且开始按钮变成停止按钮。当按下停止按钮时钟也暂停，停止按钮变回开始按钮。滚动条的部分我们先设置Max和Min的值。将时间的Interval设置成与滚动条的Value一致，这样可以保证进度条和时钟连接在一起。时钟因需要控制传输的状态是个难点。时钟控制着传输的快慢，初始情况下传输时标签的宽度每次增加10，拖动滚动条改变传输速度时，进度数值用标签的宽度除以窗体的宽度取整×100表示。公式：int（（Label.Width / Form1.Width）） * 100。文件传输过程中显示文件正在传输+传输进度数值，传输成功后跳出提示框，传输结束。

现在我们用VB简单地模拟了传输文件的进度条。用VB开发简单程序还是很方便的，下阶段我们不仅局限于模仿界面，还可以思考一下真的文件传输程序是什么样子呢？