如何求得一个字符表达式的值
编号：QA000195
建立日期: 1998年12月13日 最后修改日期：2000年4月6日
所属类别：
hehui:
在VFP中有一个宏运算符"&"，非常有用。例如在VFP的命令窗口中可执行如下操作:
a=3
b=2
c="a>b"
?&c
.T.
但是在VB中如何实现宏运算，也就是说如何求得一个字符表达式的值呢？
回答:
要实现VFP的宏运算的所有功能有点困难，但要只是计算字符串表达式的值就容易多了。你可以在http://www.softcircuits.com下载Eval的VB例子，它可以实现字符串表达式运算(加、减、乘、除、乘方)的求值。你可以修改源程序加上其它运算符号。它实现的原理很简单，你可以在任何一本数据结构方面的书中找到，因为它是堆栈使用的典型例子。
另外，利用Script Control也可以实现这个功能，参考QA001400 "哪里有Script Control"。
商建国的意见：
使用数据表生成统计字段完成简单又有效的计算器功能
On Error GoTo s1
hcb.Open "select " & Text1.Text, db
Text2.Text = yfdj01.Fields(0)
yfdj01.Close
On Error GoTo 0
End If
Exit Sub
s1:
MsgBox ("错误的表达式")
Text1.Text为字符表达式
Text2.Text为计算结果
主持人注：尽管商建国先生的这个方法不见得实用，但很有意思。
此问题由李海回答。
| |
|
|
| |
|
|
