弱问：如何读取datareader中的每一列数据？急，在线等

我的脚本语言是vb
……
strSQL = "select * from T_GRGJJDQXX where GRDQ_DWZH='" & a & "' and GRDQ_GRZH='" & b & "'"
myConn = New OleDbConnection(strConn)
myCommand = New OleDbCommand(strSQL, myConn)
myConn.Open()
dr = myCommand.ExecuteReader()
数据库的连接没有问题
dr.hasrows值也为真，dr中读到了一条数据，数据第一列是GRDQ_DWZH
我试图将该列得值赋给label.text，这么写
label.text=dr.item(0)
报错说“不存在此行/列的数据”
我换成item(1)也是同样报错。总之就是读不出来
请问应该怎么写啊？