VB下的公式解析器，有人愿意测试吗？

小弟初用VB不久，自编了一个公式解析器
支持简单的四则运算，支持扩号
---------------------------------------------
一个CExpToVal的类。属性Srcstring接受字符串
属性Errnumber返回错误代码
属性m_AnsValue返回表达式的值
属性ErrDescription返回错误的描述
扩充功能
    m_CurPlace纪录当前处理位置，一旦出错，可告诉客户错误输入的具体位置
（还未完成此功能）测试
((5/6)+9)/5=1.96666666666667正确
(1+((4+7)*5))/8=7正确
(1+2)*(2+3)*(3+4)=105正确
(((((1+2)+3)+4)+5)+6)=21正确
(2*-3)-(9*0) =-6   ok
(2+-3)*-9  =9 ok
---------------------------------------------有人愿意帮忙看看吗？
[email protected]
来信即寄源码....希望各位多多指教，如果你有好的公式解析器，请发给我一份看看