如何按行读文本

分隔符用的是”|“，如何按行读取，把|前面的插入数据库的一列，把|后面的插入数据库的一列

为切实加强易做图信息网络安全管理工作，规范易做图机关人民易做图使用易做图信息网，落实（  ）的管理责任制，根据《中华人民共和国人民易做图法》、《中华人民共和国计算机信息系统安全保护条例》等有关法律、法规，制定本规定。
A 谁主管、谁负责
B 谁使用、谁负责
C 谁负责、谁使用
D 谁负责、谁主管
|AB
有很多这样的题，把|前面的插入数据库表中的STNR，把|后面的插入数据库表中的STDA，有很多行，也就是把|前面的写到数据库pubs_test表中，列名STNR，把|后面的写到数据库pubs_test表中，列名STDA，一一对应，分别插入。各位高手有什么好的方法。 --------------------编程问答-------------------- 例:
            Dim sr As IO.StreamReader = IO.File.OpenText("aa.txt")
            Dim str As String = ""
            Do While Not sr.EndOfStream
                str = sr.ReadLine()
                Dim stnr As String = ""
                Dim stda As String = ""
                Dim stra() As String = str.Split("|")
                If stra.Length >= 2 Then '有题目和答案
                       stnr = stra(0)
                    stda = stra(1)
                    '写数据库
                End If
            Loop --------------------编程问答-------------------- 但是在insert数据库的时候，又出现了索引超出了数组界限的问题,如何解决呢 --------------------编程问答-------------------- 但是在insert数据库的时候，又出现了索引超出了数组界限的问题,如何解决呢,急啊 --------------------编程问答-------------------- 跟踪调试后，是这里的问题
            mycom.CommandText = "insert into testinsert(STNR,STDA) values ('" & stra(0) + "'|'" + stra(1) + "')"
索引超出了数组界限

补充：.NET技术 ,  VB.NET