用Dir列出檔案的名稱
這個是VB函數Dir的特別功能,在很多地方都很有用。(準備一個List1、Command1)
Private Sub Command1_Click() Dim p As String p = Dir("c:\") Do Until p = "" DoEvents List1.AddItem p p = Dir Loop End Sub
上一頁