如何用findfirstfile和findnextfile寻找一个目录下面所有符合条件的文件?

下面是我的代码
函数声明
FUNCTION ulong FindFirstFile(ref string lpFileName,ref gstr_finddata lpFindFileData) LIBRARY "kernel32.dll" ALIAS FOR "FindFirstFileA"
FUNCTION ulong FindNextFile(ulong hFindFile,ref gstr_finddata lpFindFileData) LIBRARY "kernel32.dll" ALIAS FOR "FindNextFileA"

代码 :
ls_file = '106*.txt'
ll_find = findfirstfile(ls_file,ao_finddata)

do while true
if findnextfile(ll_find,ao_finddata) <> 1 then
exit
end if
loop
但总是找不到正确的文件