It was not clear for me that you were working with a string.
Surely that the scripting can help you. This is copied from a previous message (original poster JCF):
Dim oSC As ScriptControl
Dim iVal As Integer
Set oSC = New ScriptControl
oSC.Language = "VBScript"
Dim toexe As String
toexe = "4*5"
iVal = oSC.Eval(toexe)
MsgBox iVal, vbOKOnly, "Value of iVal"
>hi eric,
>dear, the equation which i showed will be a string and form that i want to calculate the amount
>
>
>amol
Éric Moreau, MCPD, Visual Developer - Visual Basic MVP
Conseiller Principal / Senior Consultant
Moer inc.
http://www.emoreau.com