Resolví sucede que no debía usar a SQL para resolver la operación matematica
si no el propio visual
tenia que bajar la libreria NCalc les dejo el codigo
Código:
Imports NCalc ' importo la libreria
' union es el string donde traigo mi formula desde la base de datos en este ejempo puse la formula manualmente. muy importante decirle al visual que es un tipo string
Dim union As String = (9000 * 0.05)
Dim es As New Expression(union)
Dim result As Object = es.Evaluate()