新人用VBA读txt文件到excel中的有关问题

新人求助用VBA读txt文件到excel中的问题
有一个txt文件，里面的内容如下：
a_b = {1, haha, 192.168.1.1, 28 };
c_d = {2, 1, 1, "sdfa" };
类似上面的数据有很多条。然后这个txt文件放在C:\DATA\0107\gx_ars_cq-ars-a\get_sb_fs_1目录下。

现在我想读取这个目录下的这个txt文件到excel中，我写了一个按钮，然后点击的时候用户可以选择文件，因为类似这样的txt文件有很多。
代码如下：

VB.NET code

Private Sub ComButOpFile_Click()xfile = Application.GetOpenFilename("Text File (*.txt),*.txt")If xfile = False Then Exit SubOpen xfile For Input As #1Do While Not EOF(1)Line Input #1, xliner = r + 1Cells(r, 1) = xlineLoopClose #1End Sub

现在的一个问题是要解析这个文件的目录，就是说：要把gx放在excel中同一行的C列，ars放到B列，cq-ars-a放到D列，而这个文件的文件名，比如a.txt放到F列，然后把文件里a_b的内容依次放到G、H、I、J列中。
这个问题怎么解决啊？求高手帮帮我！谢谢，我是新手，对这方面不是太懂

------解决方案--------------------------------------------------------

------解决方案--------------------------------------------------------


这里没高手 ！~