关于将文本文件内容转换成字符串数组的问题

Question

现在一文本文件,里边词语若干个,每个词语用逗号分开,请问如何把把每一个词语提取出来放到一个字符串数组里,有时间的麻烦把所有代码写出来,没有时间的把主要语法和逻辑写清楚也可以,谢谢了

Answer 1

dim strTemp,strFile,strArr() as string
open filePath for input as #1
do until eof(1)
line input #1,strTemp
strFile =strFile & strTemp
loopstrArr = split(strFile,",")

Answer 2

用SPLIT函数就可以实现：(大致代码如下所示：）'读取文件
dim strFile as string
dim sArray() as string
dim fs as new filesystembject
dim ft as textstream
set ft=fs.opentextfile("文件路径+文件名")strFile=ft.readallsArray()=split(strFile,",",-1)
以上代码，可以先试一试！

Answer 3

首先读取文本文件,写到字符串变量中
然后用split函数将各个用逗号隔开的字符串读入数组中dim strTemp,strFile,strArr() as string
open filePath for input as #1
do until eof(1)
line input #1,strTemp
strFile =strFile & strTemp
loopstrArr = split(strFile,",")strArr就是你要的东东