一般情况下,我们要读文件内容使用的语句为:GetFileOpenName ( '选择打开的文件', ls_path, ls_filename),但这种方式,只能打开一个文件。其实PB里该方式中自带隐藏了一个多文件的打开方式,而且也很简单,只需要把ls_filename参数定义为数组即可,如:
string ls_path, ls_filename, ls_filenames[] //ls_filenames的定义是重点
string ls_temp
integer li_value, i
ls_temp = GetCurrentDirectory ( )
Post ChangeDirectory ( ls_temp )
li_value = GetFileOpenName ( '选择要打开的所有文件', ls_path, ls_filenames[])
If li_value = 0 Then Return -1
for i = 1 to UpperBound(ls_filenames) //20210709 JACK 修改为接收多文件
ls_filename = ls_filenames[i]
//...这样就可以把一个个已选文件读出来。
next