如何判断CSV文件里有没有数据?迅雷结帖!
Access 2003中,如何判断一个CSV文件(路径已知)中有没有数据?
换句话说如何判断一个CSV文件里,有没有一条或者一条以上的数据?
我结帖很快的,谢谢!
[解决办法]
直接用FileLen判断.
文件大小为0是肯定没数据的.
[解决办法]
同上,除了这个内置函数肯定不支持UNICODE,算是个问题.
[解决办法]
if filelen(filename) = 0 then
[解决办法]
试试
Private Sub Command1_Click() Dim strTmp As String Open "C:\1.csv" For Input As #1 While EOF(1) = False Line Input #1, strTmp If Trim(strTmp) <> "" Then MsgBox "有数据" Exit Sub End If WendEnd Sub
[解决办法]
Dim s$Open "x:\temp\Test.csv" For Input As #1Do While (Not EOF(1)) Input #1, s If (Len(Replace$(Replace$(s, " ", ""), ",", "")) > 0) Then MsgBox "文件包含有效数据!", 64, "消息" Exit Do End IfLoopClose
[解决办法]
我觉得你还是要尽量明确一下数据的格式,不能让人随意填内容进去,比如说,搞个全角空格" "