Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:请教表达式求值代码

1楼
wqc360 发表于:2011/5/8 0:21:00
怎样实现在窗口1文本框TextBox1中输入1算式:
如(10+2)*2*1、5/(5-5/1)、6/(5/4-1)、10*(4-2)+4等
点计算按钮,文本框中TextBox2出现计算结果,如以上都等于24.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:速算24.table

2楼
狐狸爸爸 发表于:2011/5/8 7:36:00

代码:

Dim s As String = e.Form.Controls("TextBox1").Value
If s > "" Then
    e.Form.Controls("TextBox2").Value = eval(s)
End If

 

参考:

http://www.foxtable.com/help/topics/1277.htm

 

3楼
wqc360 发表于:2011/5/8 22:31:00
谢谢狐爸
共3 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02930 s, 3 queries.