AccessVB: List all files in a folder

I have a table titled: "ListFileNames" with 2 columns titled: "FileName" and "FileLocation". What VB code would I use so that it would list the names and locations of all files in a selected folder.

*Pretend the location of my files are in: "C:\FileList" and that this folder contains 5 files:"Financials.xls, Statistics.mdb, Resume.doc, Accounting.txt, Help.txt"

If you ran the vb code then the table "ListFileNames" will look like this...

ColumnName:    FileName                            FileLocation
                         Financials.xls                     C:\FileList      
                         Statistics.mdb                     C:\FileList  
                         Resume.doc                        C:\FileList  
                        Accounting.txt                     C:\FileList  
                        Help.txt                                C:\FileList