Foxtable(狐表)用户栏目专家坐堂 → 关于表达式计算的求助!


  共有24150人关注过本帖树形打印复制链接

主题:关于表达式计算的求助!

帅哥哟,离线,有人找我吗?
ahljy351
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:187 积分:1489 威望:0 精华:0 注册:2008/9/2 7:52:00
关于表达式计算的求助!  发帖心情 Post By:2008/10/28 10:03:00 [只看该作者]

定义了三个全局变量。分别为 x h y(x、y为整数,h为计算符号+-×÷)

现在要求,将x h y的值赋给变量da.

用Eval()如何写代码?


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2008/10/28 10:17:00 [只看该作者]

帮助重没有说明,Eval是可以实用全局变量的,和字段一样,只是前面要加上符号!

例如:

 

Vars.Add("a",GetType(Double),123.12)

Vars.Add("b",GetType(Double),321.12)

Output.Show(Eval("[!a] + [!b]"))


 回到顶部
帅哥哟,离线,有人找我吗?
ahljy351
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:187 积分:1489 威望:0 精华:0 注册:2008/9/2 7:52:00
  发帖心情 Post By:2008/10/28 10:21:00 [只看该作者]

但是现在+号是动态的,随机的,赋值给变量h

如何将+替换为变量h?

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2008/10/28 10:28:00 [只看该作者]

Eval的参数是一个字符串,可以随心所欲地合成: 



Dim
h As string = "+"

Vars.Add("a",GetType(Double),123.12)

Vars.Add("b",GetType(Double),321.12)

Output.Show(Eval("[!a]" & h & "[!b]"))


 回到顶部
帅哥哟,离线,有人找我吗?
ahljy351
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:187 积分:1489 威望:0 精华:0 注册:2008/9/2 7:52:00
  发帖心情 Post By:2008/10/28 10:50:00 [只看该作者]

e.form.controls("zqda").text=Eval("[!x]" & "[!h]" & "[!y]")

标签怎么不能赋值?前面的变量已全部定义了。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2008/10/28 10:51:00 [只看该作者]

text是只读的,可以读写的是value属性:

e.form.controls("zqda").value=Eval("[!x]" & "[!h]" & "[!y]")

 回到顶部
帅哥哟,离线,有人找我吗?
ahljy351
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:187 积分:1489 威望:0 精华:0 注册:2008/9/2 7:52:00
  发帖心情 Post By:2008/10/28 11:06:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图未命名.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2008/10/28 11:13:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目20.table


 回到顶部
帅哥哟,离线,有人找我吗?
ahljy351
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:187 积分:1489 威望:0 精华:0 注册:2008/9/2 7:52:00
  发帖心情 Post By:2008/10/28 11:48:00 [只看该作者]

狐爸还是没能理解我的想法。唉。自己再摸摸看吧。我上面的“zqda"是标签。


 回到顶部
帅哥哟,离线,有人找我吗?
ahljy351
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:187 积分:1489 威望:0 精华:0 注册:2008/9/2 7:52:00
  发帖心情 Post By:2008/10/28 11:51:00 [只看该作者]

Output.Show(Eval("[!x]+[!y]"))能得到答案

Output.Show(Eval("[!x]"  & "[!h]" & "[!y]"))却得不到答案,也不提示错。也就是空白

[此贴子已经被作者于2008-10-28 11:51:24编辑过]

 回到顶部
总数 12 1 2 下一页