feof( ) 函数示例

*** 打开文件 test.txt ***
gnfilehandle = fopen('test.txt')
*** 把文件指针移到 bof***
gnposition = fseek(gnfilehandle, 0)
*** 如果文件指针既在 bof 又在 eof，则是“空”文件***
*** 否则文件中必有内容***
if feof(gnfilehandle)
	wait window 'this file is empty!' nowait
else
	wait window 'this file has something in it!' nowait
endif
= fclose(gnfilehandle)