在VB6中需要帮助的文本保存为.csv,但所有的A柱希望分隔空间

在VB6中需要帮助的文本保存为.csv,但所有的A柱希望分隔空间

问题描述:

需要帮助,在VB6中保存的文本框为.csv,但所有的A柱要分隔空间在VB6中需要帮助的文本保存为.csv,但所有的A柱希望分隔空间

海,我有问题,当保存的文本框为.csv使用VB6的代码,我找不到任何代码来自动保存为分隔空间,所以单独所有字成为列

在这里,我的代码在VB6这样

Private Sub Command1_Click() 
Dim mytxt As String 
mytxt = Text1.Text 
Open "C:\Documents and Settings\user\Desktop\history.csv" For Append As #1 
Print #1, mytxt 
Close #1 
End Sub 

这里,我保存了历史.csv,像这样的输出

(10/13/17 04:48PM E344 T10203 25596595     00:01'33) 

enter image description here

这列中的所有文本,

我想自动保存history.csv输出在VB6,这样

10/13/17(in A Column) 
04:48PM(in B Column) 
E344(in C Column) 
T10105(in D Column) 
25596595(in E Column) 
00:01'33(in F Column) 

enter image description here 分隔空间,直至无限行 请帮助我,这个Vb6代码问题

+0

如果细胞在其文本的空间会发生什么? – jsotola

+0

你的文件是专门*不* csv。如果您需要csv,请使用分隔符将数据保存为开头,而不是固定宽度的列。如果要保留固定宽度的列并仍然在Excel中打开文件,请参阅https://msdn.microsoft.com/en-us/vba/excel-vba/articles/workbooks-opentext-method-excel。 – GSerg

+0

jsotola,结果将是(10/13/17 04:48 PM E344 T10203 25596595 00:01'33)列A,如第一张图 – sopian

这可能工作

这里找到https://support.office.com/en-us/article/Import-or-export-text-txt-or-csv-files-5250ac4c-663c-47ce-937b-339e391393ba

变化的分离器,所有的.csv文本文件

在Microsoft Windows中,单击开始按钮,然后单击控制面板

打开更改对话框区域和语言设置

列表分隔符框中键入新的分隔符。

单击确定两次。

我认为你的csv文件在列之间有一个逗号作为分隔符? 所以文件中的行实际上是这样的:

10/13/17,04:48PM,E344,T10203,25596595,00:01'33 

如果文件看起来像这样,那么它是一个CSV(逗号分隔值)文件。

如果您直接从Windows打开csv文件并选择Excel作为打开它的程序,则Excel不会将其作为csv文件进行处理,而只是作为纯文本文件进行处理。

要在Excel中打开csv文件,首先需要启动Excel,然后从Excel中打开csv文件。然后,它会问你如何处理文件:

Excel csv import (1)

Excel csv import (2)

语言的截图是荷兰人,但我猜的布局将在您的本地版本类似。

我的测试文件的名称为tmp.txt

+1

布局是相同的英语.... 21世纪罗塞塔石...大声笑 – jsotola

+0

Hrqls,我需要vb6代码自动保存就像你上面解释 – sopian

+0

你在帖子中显示的代码应该工作...当你在记事本中打开文件时显示的是什么? – Hrqls