=== 关于变量替换用于计算的一个问题 ===

一直没搞清下面的情形该如何处理，请各位帮帮忙：

google_ad_width = 250; google_ad_height = 250; google_ad_format = "250x250_as"; google_color_url = "000000";

=====================

Dim NumCount, Num1, Num2, Num3, Num4, Num5, Num6, Num7, Num8 As Integer

Dim NumString As String

"把变化的变量(或是表字段)名称计算式存入NumString (注：是名称，且计算式是根据实际而变化的)

NumString = "Num2 + Num3 + 2 * Num4 - (Num5 + Num6) * 0.17"

"然后对变量进行赋值

Num1 = 10

Num2 = 20

Num3 = 30

...

Num8 = 80

=====================

请问各位：如何取得 NumString 的计算值？

第2楼. 由 dutguoyi 于 2007-3-26 10:07:55 发表

有这个必要么？

你要分析这个字符串有哪些是变量，哪些是运算符号，哪些是数字，然后通过对应来进行计算。

例如

获取一个字符串如"Num2"

if 字符串 = "Num2" then

结果变量 = Num2 等运算。

我觉得没有必要。

第3楼. 由 AreZong 于 2007-3-26 11:11:12 发表

其实我是碰到这样一个情况的：

有一个数据表，其中有11个数值列，10个是手动输入数值的原始列，1个是计算列，但该计算列的计算公式不是固定的，要根据每个记录中的10个数值列的变化而变化的。并且就算10个数值列中的数值是固定的，但老板也会随着时间、利润、货币汇率、甚至他的心情的不同而调整该计算列中的计算公式，故不能固定该计算列中的计算公式。