ขอรบกวนถาม Error vb.net ฟ้อง Error Invalid attempt to access a field before calling Read()

 Dim myCon As MySqlConnection
    Dim myCom As MySqlCommand
    Dim myDa As MySqlDataAdapter
    Dim myDr As MySqlDataReader
    Dim myDs As DataSet
    Dim myTs As MySqlTransaction
    Dim strConn As String = ConfigurationManager.ConnectionStrings("Center.My.MySettings.dbCenter").ConnectionString
    Dim Conn As MySqlConnection = New MySqlConnection
    Private Function get_table() As String
        Dim tbName As String
        Dim sql, sqlTable As String
        Dim curYear As String
        curYear = Str(Year(Date.Now))
        curYear = curYear.Substring(3, 2)
        myCon = New MySqlConnection
        myCon.ConnectionString = strConn
        myCon.Open()
        If lcSelect = "Year" Then
            sql = "select fcTableName from tbYear where fcReportName = '" & lcPrint & "' and fcYear = '" & lcYear & "'"
        ElseIf lcSelect = "Date" Then
            sql = "select fcTableName from tbDate where fcReportName = '" & lcPrint & "' and fdBegin = '" & lcBeg & "' and fcEnd = '" & lcEnd & "'"
        End If
        myCom = New MySqlCommand(sql, myCon)
        myDr = myCom.ExecuteReader
        myDr.Read()
        If IsDBNull(myDr("fcTableName")) Then
            tbName = ""
        Else
            tbName = myDr("fcTableName")
        End If
        myDr.Close()