大家好，我们今日继续讲解VBA代码解决方案的第130讲内容：对于有序的顺序文件CSV类的读取处理方法。在第129讲中，我深入的讲解了几种文件的分类及其区别。当然，对于我的讲解许多朋友会提出异议，这个没关系，很多问题可以争鸣，我讲的是我对这些知识的理解，还有就是很多朋友总是急于和我探讨为什么自己的程序运行不下去，其实，很多问题都是基于自己对知识点的理解，要深入的理解我讲过的每一讲内容，不要期望我把所有的问题都能列举到，只要你掌握了基本的内容可以能运用自如。我的《VBA代码解决方案》一书一共会出三册，会覆盖到VBA的大部分知识点。
好了，言归正传。某些文件通常保存为CSV,TXT或PRN格式，输入的每行数据由逗号，Tab或者空格分隔。这种类型的文件用Input # 语句可以比前面介绍的Line Input #语句读取更快些。Input # 语句允许你从一个打开的文件中读取数据到几个变量中。下面我以CSV文件为例讲解一下这类文件利用Input #的读取过程。大家是否还记得我在之前的文章中讲过的顺序文件的整行读取呢？整行的读取用的是Line Input #语句，而我们今天用的是Input #语句。
该函数如下所示： Input #filenumber, variablelist
参数：
① Filenumber是用Open语句打开文件时的同一个号码
② variablelist是一个以逗号分开的变量清单，用来储存读取的的数据。(注1)
下面的截图例子是一个用逗号分隔数据的顺序文件：
对于CSV文件，其实它的结构是这样的：
型号，分类，数量
A123，优，12
A124，良，15
A125，优，18
A126，优，21
要读取该格式的文本的话，你可以直接明确给出每组数据的变量：型号，分类，数量
。我们看下面的代码：
Sub mynzCSV()
Dim name As String, class As String, num As Integer
Open "E:\nz\work\文章\举例CSV.CSV" For Input As #1
Do While Not EOF(1)
Input #1, name, class, num
MsgBox name & ", " & class & ", " & num
Loop
Close #1
End Sub
看看代码截图：
程序执行过程：上面的程序首先打开文件"E:\nz\work\文章\举例CSV.CSV"读取数据；并且建立一个Do…While循环，在整个文件里循环运行，直到文件的结尾；Input #1语句用来将每行的内容读取到三个变量：name, class, num，也就是说有针对性的每次读取三个值；然后，用信息框将这三个变量的内容分组显示出来；程序最后关闭文件E:\nz\work\文章\举例CSV.CSV 。
下面看程序的运行：
1 ：第一组数据：
第二组数据：
好了就举出这两组数据了。
今日内容分回向：
1 什么是CSV文件？
2 如何读取CSC文件更加方便呢？
3 上述的程序运行截图中为什么"数量"没有显示出来呢（红色箭头处）？
注1：关于此变量在《VBA代码解决方案》中还会有进一步的代码实测内容。
