Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
使用SQL将文本文件拆分为Access数据库_Sql_Vba - Fatal编程技术网

使用SQL将文本文件拆分为Access数据库

使用SQL将文本文件拆分为Access数据库,sql,vba,Sql,Vba,全部, 这是我的文本文件NEW_SCANNING.txt中三行的示例: I;05/29/2013;06:55:37;3124480071200;1;801;1;;1 I;05/29/2013;06:56:05;0049004004827;1;801;1;;1 I;05/29/2013;06:56:09;54491069;1;801;1;;1 我希望能够选择第三个和第四个“;”之间的内容,在这种情况下,它将是 3124480071200 0049004004827 54491069 因此,我需

全部,

这是我的文本文件NEW_SCANNING.txt中三行的示例:

I;05/29/2013;06:55:37;3124480071200;1;801;1;;1
I;05/29/2013;06:56:05;0049004004827;1;801;1;;1
I;05/29/2013;06:56:09;54491069;1;801;1;;1
我希望能够选择第三个和第四个“;”之间的内容,在这种情况下,它将是

3124480071200
0049004004827
54491069
因此,我需要程序做的是搜索以字母
I
开头的每一行,然后选择第3行和第4行之间的内容

然后它必须将第一个选择放入名为SelBarc的组合框中。如果它第一次这样做了,它就必须继续第二次,依此类推


有谁能帮我吗?

打开,阅读,分成几行,然后循环

dim lines() as string,i as long
Open "c:\xxx\NEW_SCANNING.txt" for input as #1
    lines = split(Input$(lof(1), #1), vbcrlf)
close #1

For i = 0 to ubound(lines)
    if Left$(lines(i), 1) = "I" then combobox.additem split(lines(i), ";")(3)
Next