两个巨简单的问题，立即给分

[zceast]

1、如何将一个字符串分割成N个子串，要简单的方法，有什么函数可以解决，如：
abc|de|fg||ff …………
分割以后是
a="abc"
b="de"
c="fg"
d=""
e="ff"
…………

2、如何将一个TXT文件完全读到一个字符串里面，和如何将一个字符串写到TXT文件里面，这个字符串可能很大。

[limingFAQ]

这是访问文件的问题和对字符串的处理。

[AustinLei]

1.
Dim a() As String
a = Split("abc|de|fg||ff", "|")
For i = 0 To UBound(a) - 1
Print a(i)
Next i

[cnstarx]

楼上的应该是这样

Dim a() As String
a = Split("abc|de|fg||ff|", "|")－－－－加“|”
For i = 0 To UBound(a) - 1
Print a(i)
Next i

[samtyty]

应该是这样的
Dim a As Variant
a = Split("abc|de|fg||ff|", "|")
For i = 0 To UBound(a) - 1
Print a(i)
Next i

[samtyty]

2、如何将一个TXT文件完全读到一个字符串里面，和如何将一个字符串写到TXT文件里面，这个字符串可能很大。

下面这行可以将文件读到变量中
LinesFromFile = StrConv(InputB(LOF(FileNum), FileNum), vbUnicode)