La ecuacion ha de estar despejada, y simplemente le pasas los valores:
Leete esto para mas informacion:
Código (vb) [Seleccionar]
lRet1 = (-b + Sqr((b ^ 2) - 4 * a * c)) / 2 * a
lRet2 = (-b - Sqr((b ^ 2) - 4 * a * c)) / 2 * a
Leete esto para mas informacion:
Código [Seleccionar]
http://es.wikipedia.org/wiki/Ecuaci%C3%B3n_de_segundo_grado