VB MySql AddWithValue सफलतापूर्वक मान पास नहीं करता है

@ हटाएं

Dim cmd As New MySqlCommand("SELECT code FROM decoder WHERE ann_id = @aid", conn) 
cmd.Parameters.AddWithValue("aid", 1)
Dim reader As MySqlDataReader = cmd.ExecuteReader()