求助! vb6.0 怎样用datagrid控件中显示文本数据
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\;Extended Properties=text;Persist Security Info=False"
Adodc1.RecordSource = "select * from rb1.txt" ‘***************选择c盘目录下rb1.txt文件!*******************
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh
‘***************文件1格式为如下*************************************
101税收收入0289375.73
10101增值税0210945
1010101国内增值税0191553.14
101010101国有企业增值税012220.64
’**************都是用tab分割的***********************************
刷新DataGrid1后,所有的字符均显示在控件的第一个字段!
如果我把文件改为如下
’******************文件2*****************************************
101,税收收入,0,289375.73
10101,增值税,0,210945
1010101,国内增值税,0,191553.14
101010101,国有企业增值税,0,12220.64
’**************都是用逗号分割的***********************************
则刷新DataGrid1后,每个字段自动分割到不同字段中去了
求助如何修改代码可以让文件1格式的放入到数据库中去!!
谢谢了
[解决办法]
试试
“Extended Properties=text;Persist Security Info=False;FMT=TabDelimiter"""
[解决办法]
你确信101 税收收入 0 289375.73 是用tab分割的?
4楼的解释
str="asd(tab)dfd(tab)ddd"
aa=split(str,“(tab)”)
或
str="asd“ & vbtab & "dfd" & vbtab & "ddd"
aa=split(str,vbTab)
[解决办法]
你的分隔符是空格。
用记事本写一个名为 Schema.ini 的文件:
[rb1.txt]
Format=Delimited(" ")
放在与文本文件数据库相同目录下。