各位大哥看看如何这几个vc的函数转换成vb的函数 小弟刚学vb 大哥们帮忙

Question

vc:
     feof()    "判断文件是否为空"
     fgets()  
     fscanf()  各位大哥  这三个函数 vb中有对应的函数吗？ 如果没有 应如何改写   急用  小弟先谢谢各位大哥了！！...........

Answer 1

feof()      :EOF()
fgets()     :INPUT()(看用什么方式打开,如果是二进制用GET)
fscanf()    :PRINT()(如果是二进制方式打开,用PUT)例:
dim s as String'读文件
open "C:\aa.txt" for input as #1
while not eof(1)
    input #1,s
wendclose #1'写文件
open "C:\aa.txt" for output as #1
print #1, "文件内容"
close #1