VB一次性读入多个文件如何实现?

读入多个文件？

步骤是这样的：

1、获取多个文件的文件名，保存到一个数组

2、利用循环，将多个文件读入。

你的这个代码好像是利用commondialog多选的形式，chr(0)是文件名之间的分隔符，代码的功能是进行判断，如果有chr(0),则代表是多个文件名，如果没有chr(0)，则代表只有一个文件需要读入。

使用fopen函数依次打开多个文件即可。

1.fopen的函数原型：FILE * fopen(const char * path,const char * mode)

fopen函数的第一个参数是文件路径，第二个参数是打开方式，有以下几种方式：

r 以只读方式打开文件，该文件必须存在。

r+ 以可读写方式打开文件，该文件必须存在。

rb+ 读写打开一个二进制文件，允许读数据。

rw+ 读写打开一个文本文件，允许读和写。

w 打开只写文件，若文件存在则文件长度清为0，即该文件内容会消失。若文件不存在则建立该文件。

w+ 打开可读写文件，若文件存在则文件长度清为零，即该文件内容会消失。若文件不存在则建立该文件。

a 以附加的方式打开只写文件。若文件不存在，则会建立该文件，如果文件存在，写入的数据会被加到文件尾，即文件原先的内容会被保留。（EOF符保留）

a+ 以附加方式打开可读写的文件。若文件不存在，则会建立该文件，如果文件存在，写入的数据会被加到文件尾后，即文件原先的内容会被保留。 （原来的EOF符不保留）

wb 只写打开或新建一个二进制文件；只允许写数据。

wb+ 读写打开或建立一个二进制文件，允许读和写。

wt+ 读写打开或着建立一个文本文件；允许读写。

at+ 读写打开一个文本文件，允许读或在文本末追加数据。

ab+ 读写打开一个二进制文件，允许读或在文件末追加数据。

上述的形态字符串都可以再加一个b字符，如rb、w+b或ab+等组合，加入b 字符用来告诉函数库打开的文件为二进制文件，而非纯文字文件。

返回值：文件顺利打开后，指向该流的文件指针就会被返回。如果文件打开失败则返回NULL，并把错误代码存在errno中。

2.例程：

#include<stdio.h>

#define F_PATH "d:\\myfile\\file.dat"

char c

int main(){

FILE*fp=NULL//需要注意

fp=fopen(F_PATH,"r")

if(NULL==fp) return -1//要返回错误代码

while(fscanf(fp,"%c",&c)!=EOF) printf("%c",c)//从文本中读入并在控制台打印出来

fclose(fp)

fp=NULL//需要指向空，否则会指向原打开文件地址

return 0

}

---