如果你的txt文本的格式符合VB的要求，VB可以直接将txt文件作为一种数据库打开(参见Data控件的Connect属性)。我们在QA000115 “在VB中如何实现把当前库或表转换为另外一种数据库文件”里已经介绍了如何进行两种数据库格式的转换。在VB中有一个工具VisData，它实现了两种数据库格式的转换。如果你希望看到这个程序的源程序，可以在Samples\VisData中找到。
如果你txt文件是非标准的，你可以用Open打开文件，然后使用Input #等语句读入，在采用类似下面的语句转换，但速度比前一种方法慢：
Open "TESTFILE" For Input As #1
Do While Not EOF(1)
Input #1, MyString, MyNumber ' 读数据
rdData.AddNew ' rdData是你的Access数据库的表
rdData("String") = MyString
rdData("Number") = MyNumber
rdData.Update
Loop
Close #1
