求在VB.net中正确用好DataReader与数组赋值

在VB.net中,要求将表class中字段lesson值赋给一数组mb(),用了下段代码:

MyConnection.Open()
MyCommand = New OleDbCommand("Select * from class", MyConnection)
MyReader = MyCommand.ExecuteReader()
i = 1
While MyReader.Read()
mb(i) = MyReader("lesson")
i = i + 1
End While
MyConnection.Close()
MyCommand.Dispose()
MyReader.Close()

前面也作了Dim MyCommand As OleDbCommand， Dim MyReader As OleDbDataReader，Dim mb() As String和Dim i As Integer的定义,但运行后出现"未将对象引用设置到对象的实例"的错误信息,不知代码啥地方用错了,恳请高人指点!

错在哪一时判断不了
不过建议 select * 改为 select lesson好一些
i=1 改为 i=0
还有就是循环有问题 i=i+1是没有影响循环的，你用的是while又不是for

你的循环有问题 while 只是做了读下个数据,并不做到负指字符串循环! 再看看别人怎么说的。