c:\mp3目錄有N多MP3檔案，如何將這些檔案按時間順序升串列，最新時間在上面
list.txt內容如下,
ASDFG.MP3
ADDFG.MP3
ASFFG.MP3
ASHFG.MP3
uj5u.com熱心網友回復：
什么時間？創建時間？最后修改時間？最后訪問時間？uj5u.com熱心網友回復：
如果是最后修改時間，就比較簡單。使用 3 個 ListBox 控制元件，其中 List2 ，List3 可以設定成不可見。藏在 List1 后面或 List2.Visible = False 均可。
此外，關鍵的一點，在設計界面上將 List2 的 Sorted 屬性設定為 True。
Dim strFile As String, strDateTime As String, i As Long
List1.Clear
List2.Clear
List3.Clear
strFile = Dir("c:\mp3\*.mp3")
Do Until strFile = ""
strDateTime = Format(FileDateTime("c:\mp3\" & strFile), "yyyy-mm-dd HH-nn-ss")
List2.AddItem strDateTime
List3.AddItem strFile, List2.NewIndex
strFile = Dir()
Loop
For i = List3.ListCount - 1 To 0 Step -1
List1.AddItem List3.List(i)
Next i
uj5u.com熱心網友回復：
Shell “cmd /c dir /a-d /b /od c:\mp3\*.mp3 >d:\mp3list.txt”,vbHide
'然后讀檔案d:\mp3list.txt的內容。
C:\>dir /?
顯示目錄中的檔案和子目錄串列。
DIR [drive:][path][filename] [/A[[:]attributes]] [/B] [/C] [/D] [/L] [/N]
[/O[[:]sortorder]] [/P] [/Q] [/S] [/T[[:]timefield]] [/W] [/X] [/4]
[drive:][path][filename]
指定要列出的驅動器、目錄和/或檔案。
/A 顯示具有指定屬性的檔案。
attributes D 目錄 R 只讀檔案
H 隱藏檔案 A 準備存檔的檔案
S 系統檔案 - 表示“否”的前綴
/B 使用空格式(沒有標題資訊或摘要)。
/C 在檔案大小中顯示千位數分隔符。這是默認值。用 /-C 來
禁用分隔符顯示。
/D 跟寬式相同，但檔案是按欄分類列出的。
/L 用小寫。
/N 新的長串列格式，其中檔案名在最右邊。
/O 用分類順序列出檔案。
sortorder N 按名稱(字母順序) S 按大小(從小到大)
E 按擴展名(字母順序) D 按日期/時間(從先到后)
G 組目錄優先 - 反轉順序的前綴
/P 在每個資訊螢屏后暫停。
/Q 顯示檔案所有者。
/S 顯示指定目錄和所有子目錄中的檔案。
/T 控制顯示或用來分類的時間字符域。
timefield C 創建時間
A 上次訪問時間
W 上次寫入的時間
/W 用寬串列格式。
/X 顯示為非 8.3 檔案名產生的短名稱。格式是 /N 的格式，
短名稱插在長名稱前面。如果沒有短名稱，在其位置則
顯示空白。
/4 用四位數字顯示年
可以在 DIRCMD 環境變數中預先設定開關。通過添加前綴 - (破折號)
來替代預先設定的開關。例如，/-W。
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/88075.html
標籤：VB基礎類