Dim
txtFileName
As
String
'
定义变量用以保存文件输出路径及名称
txtFileName = " C:AA.CSV "
Dim txtData As String ' 定义变量以保存记录信息
txtData = " AA,BB,CC,DD " ' 记录每个字段以豆号隔开
' CSVファイルを
Open txtFileName For Output As # 1 ' 打开上面指定的文件,并开始保存数据
Print # 1 , txtData ' 将信息数据保存在文件中
Print # 1 , txtData
Close # 1 ' 关闭
txtFileName = " C:AA.CSV "
Dim txtData As String ' 定义变量以保存记录信息
txtData = " AA,BB,CC,DD " ' 记录每个字段以豆号隔开
' CSVファイルを
Open txtFileName For Output As # 1 ' 打开上面指定的文件,并开始保存数据
Print # 1 , txtData ' 将信息数据保存在文件中
Print # 1 , txtData
Close # 1 ' 关闭