[VB.NET]Null Reference Exception

[Typo]

Salve a tutti.

Ho dichiarato un metodo in una mia classe che si occupa di gestire un Reader ( mysqldatareader )

Il metodo della classe è il seguente

 Public Sub Lettore(ByRef Lettore As MySqlDataReader, ByVal StringaSQL As String)
        ConnessioneSQL("localhost", "root", "**", "**")
        Try
            _CMD.CommandText = StringaSQL
            _CMD.Connection = _Connessione
            Lettore = _CMD.ExecuteReader
        Catch ex As Exception
            Lettore = Nothing
        End Try
    End Sub

e il modo in cui lo richiamo è questo qui

If Form1.ModificaAttiva = True Then
            Dim SQLString As String
            SQLString = "SELECT Nome, Cognome, Telefono FROM tabella WHERE IDCliente = '" & Form1.RowIndex & "'"
            Dim ManagerSQL As New clsSQL
            Dim Lettore As MySqlDataReader
            ManagerSQL.Lettore(Lettore, SQLString)
            While Lettore.Read()
                TXTnome.Text = Lettore.GetString(0)
            End While
            Lettore.Close()
            FRMElencoClienti.ModificaAttiva = False
        End If

Come mai mi da una null reference qui

While Lettore.Read()

Dicendomi che devo stanziare l'oggetto ?

Grazie a tutti.
Buona Giornata

[Vinsent]

Occhio che la stò sparando....prova il codice con:

Dim Lettore As New MySqlDataReader

[rsdpzed]

probabilmente nella sub Lettore entri nel catch. Fai il debug e vedi che exception ti solleva.

[Typo]

ho risolto ragazzi, scusatemi se sono tanto idiota ma un po è il caldo un po la stanchezza !

Il codice che ho incollato è corretto me ne sono reso conto ora è quello nel programma che è toppato ( stavo lavorando con un blocco note dove tenevo una copia di sicurezza )

Il programma non funzionava perché io passavo il Lettore al metodo come ByVal ( quindi come valore ) anzi che passarlo tramite ByRef.

Mi scuso ancora.