VB模擬文件傳輸

文件傳輸是將文件從一個(gè)計(jì)算機(jī)系統(tǒng)傳到另一個(gè)計(jì)算機(jī)系統(tǒng)。它能把文件傳輸?shù)搅硪挥?jì)算機(jī)中去存儲(chǔ)，訪問遠(yuǎn)程計(jì)算機(jī)上的文件，獲取另一計(jì)算機(jī)上的數(shù)據(jù)進(jìn)行處理，把文件傳輸至打印機(jī)……一般傳輸文件時(shí)會(huì)出現(xiàn)進(jìn)度條，Windows10的進(jìn)度條會(huì)提示進(jìn)度百分比、傳輸速度、剩余時(shí)間等信息。網(wǎng)速的快慢會(huì)影響傳輸速度，今天我們用VB編程一個(gè)文件傳輸進(jìn)度條，由于沒有文件實(shí)際傳輸僅模擬傳輸?shù)倪^程，還可以手動(dòng)控制快慢。

編程前，先明確自己的需求：模仿制作一個(gè)文件傳輸?shù)倪M(jìn)度條，以及控制進(jìn)度條的快慢。為完成需求選擇使用標(biāo)簽、滾動(dòng)條、按鈕和時(shí)鐘組件。標(biāo)簽用來說明進(jìn)度條加載狀態(tài)，文件傳輸過程會(huì)顯示文件傳輸進(jìn)度百分比;滾動(dòng)條控制傳輸速度，左快右慢，可以通過移動(dòng)來觀察進(jìn)度條的變化情況;時(shí)鐘用于控制傳輸快慢。兩個(gè)按鈕“開始/停止”與“結(jié)束”。當(dāng)文件傳輸完成后，彈出提示框“傳輸結(jié)束”。

當(dāng)點(diǎn)擊開始按鈕后，時(shí)鐘啟動(dòng)且開始按鈕變成停止按鈕。當(dāng)按下停止按鈕時(shí)鐘也暫停，停止按鈕變回開始按鈕。滾動(dòng)條的部分我們先設(shè)置Max和Min的值。將時(shí)間的Interval設(shè)置成與滾動(dòng)條的Value一致，這樣可以保證進(jìn)度條和時(shí)鐘連接在一起。時(shí)鐘因需要控制傳輸?shù)臓顟B(tài)是個(gè)難點(diǎn)。時(shí)鐘控制著傳輸?shù)目炻?，初始情況下傳輸時(shí)標(biāo)簽的寬度每次增加10，拖動(dòng)滾動(dòng)條改變傳輸速度時(shí)，進(jìn)度數(shù)值用標(biāo)簽的寬度除以窗體的寬度取整×100表示。公式：int（（Label.Width / Form1.Width）） * 100。文件傳輸過程中顯示文件正在傳輸+傳輸進(jìn)度數(shù)值，傳輸成功后跳出提示框，傳輸結(jié)束。

現(xiàn)在我們用VB簡(jiǎn)單地模擬了傳輸文件的進(jìn)度條。用VB開發(fā)簡(jiǎn)單程序還是很方便的，下階段我們不僅局限于模仿界面，還可以思考一下真的文件傳輸程序是什么樣子呢？