货币类型列对应金额列显示货币符号 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 货币类型列对应金额列显示货币符号

共有3961人关注过本帖树形打印复制链接主题：货币类型列对应金额列显示货币符号

fszyhzg

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：161 积分：1298 威望：0 精华：0 注册：2010/10/5 13:54:00

货币类型列对应金额列显示货币符号 发帖心情

Post By：2014/5/28 16:55:00 [显示全部帖子]

此主题相关图片如下：qq图片20140528165043.jpg

此主题相关图片如下：qq图片20140528165049.jpg

按上上图显示，货币类型选择美元后，金额整列都会显示$***元的

表属性datacolchaged里的代码是：

Select Case e.DataCol.Name

Case "货币类型"

If e.DataRow("货币类型") = "美元" Then

DataTables("表A").DataCols("金额").SetFormat("$0.00")

ElseIf e.DataRow("货币类型") = "人民币" Then

DataTables("表A").DataCols("金额").SetFormat("￥0.00")

ElseIf e.DataRow("货币类型") = "欧元" Then

DataTables("表A").DataCols("金额").SetFormat("€0.00")

ElseIf e.DataRow("货币类型") = "港元" Then

DataTables("表A").DataCols("金额").SetFormat("HK$0.00")

End If

End Select

我想要选择美元后，只有一行显示$****,请问代码怎么改呢～～～急

fszyhzg

小大 2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：161 积分：1298 威望：0 精华：0 注册：2010/10/5 13:54:00

Post By：2014/5/29 10:11:00 [显示全部帖子]

狐兄狐弟们，我试过bin的方法，
图片点击可在新窗口打开查看

此主题相关图片如下：qq图片20140529100552.jpg

第一行的货币类型选择港元，第一行金额列没错，能显示港元符号，但第三行选择美元，第三行和第二行的金额列会自动显示$***,再第四行选择欧元，第二行和第四行金额列会自动显示欧元符号，真的搞不懂啊～～

我在项目属性项目事件的maintablechanged里添加的代码：

If MainTable.Name = "表A" Then

Tables("表A").Cols("客户").Combolist = DataTables("表B").GetComboListString("客户名称")

Tables("表A").Cols("货币类型").Combolist = DataTables("表B").GetComboListString("货币名称")

End If

[此贴子已经被作者于2014-5-29 10:13:18编辑过]

fszyhzg

小大 3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：161 积分：1298 威望：0 精华：0 注册：2010/10/5 13:54:00

Post By：2014/5/29 10:15:00 [显示全部帖子]

上了例子啦，请各位高手帮我查看一下到底哪里出问题了！

[此贴子已经被作者于2014-5-29 10:16:01编辑过]

下一主题 >> << 上一主题

主题：货币类型列对应金额列显示货币符号