Ma quetso è lo stesso errore che avevi qui
http://forum.html.it/forum/showthrea...hreadid=404145 ?!

Prova:

MSHFlexGrid1.DataSource ="Select socio_n, nome, cognome from Clienti where nome = '" & cmpric.text & "'"