- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 请老师和高手赐教 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=56108)
-- 发布时间：2014/8/29 14:41:00
-- 请老师和高手赐教
我有个项目，表数据都是以元为单位录入的，但大多数查询数据都是以万元为单位，所以我想增加个菜单按钮，通过按钮在元和万元之间转换，请老师或高手赐教，代码怎么写。老师也提供过相关帮助的方法，但帮助里是根据用户角色来判断的，所以还有些不适合。打印输出的报表已经通过设置从元转换为万元了，谢谢谢谢！！
[此贴子已经被作者于2014-8-29 14:43:50编辑过]
-- 发布时间：2014/8/29 14:44:00
--
呃，你还不如多加一表达式列，需要显示万元的时候，就显示那个表达式。
具体问题，你至少要做个例子上来吧？你空口问，别人只能空口答你
-- 发布时间：2014/8/29 14:46:00
--
呵呵，角色和万还是员没有关系。
窗口加两个RaidonButton，一个名称为元，一个名称为万：
查询按钮代码：
Dim v As Double = e.Form.Controls("查询内容输入框").Value
if e.form.Controls("万").Checked Then
v = v * 10000
end if
原来的代码。
[此贴子已经被作者于2014-8-29 14:46:54编辑过]
-- 发布时间：2014/8/29 14:47:00
--
如果要显示可以用DrawCell来实现
如果要筛选 可以用表达式类似
Filter="(列名/10000)>10"
-- 发布时间：2014/8/29 15:19:00
--
谢谢老师们，我按你们说的研究哈，菜鸟一枚，要学习哈。。。
-- 发布时间：2014/8/29 16:05:00
--
狐狸爸爸，我把你的代码改成如下后，提示：
Dim v As Double = e.Form.Controls("万元").Value
If e.form.Controls("万元").Checked Then
v = v * 10000
End If
提示：Public member \'Value\' on type \'RadioButton\' not found.
说细信息：
.NET Framework 版本：2.0.50727.3053
Foxtable 版本：2014.5.12.1
错误所在事件：窗口,数据转换,万元,Click
详细错误信息：
Public member \'Value\' on type \'RadioButton\' not found.
要不我把项目发上来帮我看一下
-- 发布时间：2014/8/29 16:08:00
--
做个例子发上来。
-- 发布时间：2014/8/29 16:35:00
--
老师帮助看一下，谢谢
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2014/8/29 16:45:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.table |
-- 发布时间：2014/8/29 16:47:00
--
比如项目里，表A和表B都有一个共有窗口1，共有窗口1有两个控件，一个是元，一个是万元，默认值是元，当点击万元控件时，所有表凡是列类型为双精度小数列全部除以10000转换为以万元表示的数值，即原来是10000，点击“万元”控件后，数值变为1