❶ VB 復制文件時顯示進度條
要用ProgressBar控制項
ProgressBar 控制項通過從左到右用一些方塊填充矩形來表示一個較長操作的進度。
語法
ProgressBar
說明
ProgressBar 控制項監視操作完成的進度。
ProgressBar 控制項有一個行程和一個當前位置。行程代表該操作的整個持續時間。當前位置則代表應用程序在完成該操作過程時的進度。Max 和 Min 屬性設置了行程的界限。Value 屬性則指明了在行程范圍內的當前位置。由於使用方塊來填充控制項,因此所填充的數量只能是接近於 Value 屬性的當前設置值。基於控制項的大小,Value 屬性決定何時顯示下一個方塊。
ProgressBar 控制項的 Height 屬性和 Width 屬性決定所填充控制項的方塊嫌戚的數量和大小。方塊數量越多,控制項就越能精確地描述操作進度。為了增加顯示方塊的數量,需要減少控制項的 Height 或者增加其 Width。BorderStyle 屬性的設置值同樣影響方塊的數量和大小。為了適應邊框要求,方塊的大小要更小一點。
可以用 ProgressBar 控制項的 Align 屬性把它自動定位在窗體的頂部或底部。
提示 縮小方塊的大小直到其所表示的進度增加量與實際進度值達到最接近的匹配程度,應使 ProgressBar 控制項的寬度至少是其長度的 13 倍。
下面的示例說明如何用一個名為 ProgressBar1 的 ProgressBar 控制項,來表示對一個大數組冗長的操作進度。把一個 CommandButton 控制項和一個 ProgressBar 控制項放在同一窗體里。示例代碼中的 Align 屬性把 ProgressBar 控制項友者缺定位在沿著窗體的底部。該 ProgressBar 不顯示任何文本。
Private Sub Command1_Click()
Dim Counter As Integer
Dim Workarea(250) As String
ProgressBar1.Min = LBound(Workarea)
ProgressBar1.Max = UBound(Workarea)
ProgressBar1.Visible = True
'設置進度的值為 Min。
ProgressBar1.Value = ProgressBar1.Min
'在整個數組中循環。
For Counter = LBound(Workarea) To UBound(Workarea)
'設置數組中每項的初好辯始值。
Workarea(Counter) = "Initial value" & Counter
ProgressBar1.Value = Counter
Next Counter
ProgressBar1.Visible = False
ProgressBar1.Value = ProgressBar1.Min
End Sub
Private Sub Form_Load()
ProgressBar1.Align = vbAlignBottom
ProgressBar1.Visible = False
Command1.Caption = "Initialize array"
End Sub
❷ 電腦拷貝東西不顯示進度條
win7 默認開啟了遠程差分壓縮,導致復制和剪切速度減碧胡慢。可以參照下面方法關掉這個服務。
在win7系統下復制、移動、傳輸或刪除文件,尤其是一些大量文件非常慢,速度是非常緩慢的。
其實,win7復制奇慢的主要悔余攔原因是其遠程差分壓縮服務所致,由於它將同盤復制或移動都當作是遠程傳送,所以在復制或移動過程中就會在開始的時候對數據進行壓縮,然後再傳送,傳到目毀鉛的地後再進行解壓縮,導致文件復制或移動變得復雜又漫長,由此可知win7拷貝文件時為什麼會變慢了!
要想真正解決這個問題,請按以下具體步驟進行:
1)點開始菜單,進入控制面板,選擇「程序」打開「程序和功能」。
2)在「程序和功能」下選擇「打開或關閉Windows功能」。
3)稍等片刻,出現「Windows功能」選項框,將裡面的「遠程差分壓縮」選項的勾去掉,然後點「確定」,之後重啟計算機即可提高文件復制奇慢的問題。
1、從Win10正式版C:\Windows\下復制Explorer.exe (對應版本)到U盤中;
2、由U盤啟動盤進入到WinPE下;
3、然後將復制的Explorer.exe覆蓋到目標系統的C:\windows下重啟即可
❹ 怎樣用批處理拷貝文件並顯示進度條
/y/z "大文件" "豎啟敗存放路徑"旁咐
文件不大看不到進度了
/y/z "d:\余顫winxp.gho" "e:\bak"
❺ 批處理如何顯示復制文件的進度
批處理不是專門的編程語言,並不方便「可視化」,如果是復制文件過程較長,它雖不方便顯示百分比類的進度條,但讓其顯示復制了什麼或新建了什麼內容還是可以的,這樣讓使用者能看出大致碰拆讓過程,並使得「界面友好」。如果簡單地復制文件,你可以把復制命令後自動提示信息屏蔽掉,並專門寫顯示命令來表達正在作什麼如:
@echo off
:::::::::::::::::
echo 正在復制
for /f "delims=" %%i in ('dir/b/a-d *.jpg')do (
echo %%i
"%%i" d:\bb\ >nul)
復雜點的可看我另一回答中的例子,正好運用了顯示進度類的御棚。(不笑局是被採納那位的例子)
❻ c#如何復制一個較大的文件並顯示進度條
拷貝你已經會了,只是不知道怎麼顯示對吧? 你在窗體界面上擾橡基拖一個滾動條的控制項,然後思路就是將如余這個文件的大小作為一個基數,進度條顯示的比例就是你文件實時拷貝的大小,進緩謹度條的快慢就顯示了你文件拷貝的磁碟讀寫速率。很簡單。。。
❼ 怎麼用批處理顯示復制文件時的進度(急)
如下是一個將c:\windows復制到該批處理所在目錄並顯示進度的批處理例明桐子,你可以根據你的需要來修改。你想顯示百分比的話還激拍坦是比較麻煩的,這個取決於文件大小而不是文件多少,文件大小在批處理下顯示不出百分比的,但是文件個數卻是可以的。
@echo off
setlocal enabledelayedexpansion
set b=/賀芹-\ /-\ **
set 速度=1
set 退格=
set n=0
for %%i in (%SystemRoot%\*.*) do (call :a !n!& %%i>nul 2>nul&set /a n+=1)
goto :eof
:a
set/a a=%1%%10
set/a c=%a%%%4
if %a% EQU 0 set/p=▌<nul
if %c% EQU 3 (set/p=^|<nul) else (set/p=!b:~%a%,1!<nul)
ping/n %速度% 127.1>nul
set/p=%退格%<nul
goto :eof
❽ 易語言 如何復制當前文件夾的文件並顯示進度條
我剛好有寫過這樣的超大文件的易語言復制進度,下面是代碼,我直接復制上來,你修改下就可以了,不懂M我
-----------------------------------------------------------------------------------
.版本 2
.支絕升持庫 iext
.程序集 備份窗口程序集
.程序集變數 累計數量, 整數型
.子程序 _備份窗口_創建完畢
.局部變數 循環次數, 整數型
.局部變數 n, 整數型
累計數量 = 0
備份窗口.可視 = 真
循環次數 = _啟動窗口.列表框1.取項目數 ()
進度條1.最大位置 = 循環次數
.計次循環首 (循環次數, n)
創建含宏帆多級目錄 (_啟動窗口.編輯框1.內容 + 「\」 + 到文本 (取日期 (取現行時間 ())) + 取文本右邊 (_啟動窗口.列表框1.取項目文本 (n - 1), 取文本長度 (_啟動窗口.列表框1.取項目文本 (n - 1)) - 2))
遞歸尋找 (_啟動窗口.列表框1.取項目文本 (n - 1))
進度條1.位置 = n
.計次循環尾 ()
開始復制文件 ()
.子程序 遞歸尋找, , , 遞歸樣式
.參數 目錄, 文本型
.局部變數 文件名, 文本型
處理事件 () ' 防止程序假死
.如果真 (取文本右邊 (目錄, 1) ≠ 「\」)
目錄 = 目錄 + 「\」
.如果真結束
文件名 = 尋找文件 (目錄 + 「*.*」, )
.判斷循環首 (文件名 ≠ 「」)
累計數量 = 累計數量 + 1
備份窗口.標題 = 「找到文件個數:」 + 到文本 (累計數量) + 「個」
列表框1.加入項目 (目錄 + 文件名, )
列表框1.現行選中項 = 累計數量
文件名 = 尋找文件 (, )
.判斷循環尾 ()
文件名 = 尋找文件 (目錄 + 「*.*」, #子目錄)
.判斷循環首 (文件名 ≠ 「」)
.如果真 (取文本左邊 (文件名, 1) ≠ 「.」)
遞歸尋找 (目錄 + 文件名)
創建多級目錄 (_啟動窗口.編輯框1.內容 + 「\」 + 到文本 (取日期 (取現行時間 ())) + 取文本右邊 (目錄 + 文件名, 取文本長度 (目錄 + 文件名) - 2))
.如果真結束
文件名 = 尋找文件 (, #子目錄)
.判斷循環尾 ()
.子程序 _備份窗口_可否被關閉, 邏輯型
返回 (假)
.子程序 開始復制文件
.局部變數 n, 整數型
.局部變數 進度位置, 小數型, , "2"
.局部變數 臨時路徑, 文本型
進度條1.最大位置 = 100
進度位置 [1] = 100 ÷ 累計數量
.計次循環首 (累計數量, n)
進度位置 [2] = 進度位置 [2] + 進度位置 [1]
進度條1.位置 = 進度位置 [2]
臨時路徑 = 列表框1.取項目文本 (n - 1)
列表框1.現行選中項 = n - 1
復制進程 (臨時路徑, _啟動窗口.編輯框1.內容 + 「\」 + 到文本 (取日期 (取現行時間 ())) + 取文本右邊 (臨時路徑, 取文本長度 (臨時路徑) - 2))
透明標簽3.標題 = 到文本 (進度條1.位置) + 「%」
.計次循環尾 ()
銷毀 ()
.子程序 復制進程
.參數 臨時路徑, 文本型
.參數 寫到的文件, 文本型
.局部變數 臨時數值, 整數型
.局部變數 臨時位元組, 位元組集
.局部變數 取值次數, 整數型
.局部變數 最後取值, 整數型
.局部變數 讀入文件號, 整數型
.局部變數 次數循環, 整數型
.局部變數 讀入的數據, 位元組集
.局部變數 讀入的摘要, 文本型
.局部變數 文件大小, 長整數型
.局部變數 最後摘要, 文本型
.局部變數 進度位置, 小數型, , "2"
.局部變數 讀入長度, 長整數型
.局部變數 屬性文本, 文本型
.局部變數 臨時文件號, 整數型
臨時數值 = 取文件尺寸 (臨時路徑)
臨時位元組 = 到位元組集 (臨時數值)
文件大小 = 取位元組集數據 (臨時位元組, #長整談雹數型, )
取值次數 = 到整數 (文件大小 ÷ 取值大小)
最後取值 = 文件大小 - 取值次數 × 取值大小
進度位置 [1] = 100 ÷ 取值次數
關閉文件 (讀入文件號)
關閉文件 (臨時文件號)
讀入文件號 = 打開文件 (臨時路徑, , )
移動讀寫位置 (讀入文件號, #文件首, 0)
寫到文件 (寫到的文件, 到位元組集 (「」))
臨時文件號 = 打開文件 (寫到的文件, , )
.計次循環首 (取值次數, 次數循環)
進度位置 [2] = 進度位置 [2] + 進度位置 [1]
進度條2.位置 = 進度位置 [2]
透明標簽4.標題 = 到文本 (進度條2.位置) + 「%」
讀入的數據 = 讀入位元組集 (讀入文件號, 取值大小)
移動讀寫位置 (臨時文件號, #文件尾, 0)
寫出位元組集 (臨時文件號, 讀入的數據)
.計次循環尾 ()
讀入的數據 = 讀入位元組集 (讀入文件號, 最後取值)
移動讀寫位置 (臨時文件號, #文件尾, 0)
寫出位元組集 (臨時文件號, 讀入的數據)
進度條2.位置 = 100
透明標簽4.標題 = 到文本 (進度條2.位置) + 「%」
關閉文件 (讀入文件號)
關閉文件 (臨時文件號)
.子程序 創建多級目錄
.參數 目錄名稱, 文本型
.局部變數 當前路徑, 文本型
.局部變數 目錄名, 文本型, , "0"
.局部變數 索引, 整數型
目錄名 = 分割文本 (目錄名稱, 「\」, )
.計次循環首 (取數組成員數 (目錄名), 索引)
創建目錄 (當前路徑 + 目錄名 [索引])
當前路徑 = 當前路徑 + 目錄名 [索引] + 「\」
.計次循環尾 ()