seria mas facil si haces el count como te indique, y con un executescalar lo ejecutas y esto te retorna la cantidad de filas y harias algo como esto
Código vb:
Ver originalDim registros As Integer = Convert.toInt32(cmd.ExecuteScalar())
If registros > 0 Then
MessageBox.Show("El codigo ingresado ya existe")
Else
MessageBox.Show("El codigo ingresado no existe")
End If