主题：[求助]关于Eval的一个问题

语法

Eval(Expr)
Eval(Expr,Row)
Eval(Expr,DataRow)

Expr:    要求值的表达式
Row:     用于取值的Row
DataRow: 用于取值的DataRow

这里的 Expr = “[单价]*[数量]”

想实现  Expr = “b * 7 ”这个功能

Dim b As Integer = 13698025
Dim f As String = "b * 7"      '这个公式没有错，就想在表中定义公式
Dim c As Integer
c = eval(f)
Return c

请问有什么办法，谢谢！