共14 条记录, 每页显示 10 条, 页签: [1] [2]

标题：查询表可以用代码将为0的单元格设置为Nothing，希望表达式列也可以

1楼

reachtone 发表于：2011/6/22 8:48:00

如题。这样在写addcol时，就可以简化表达式代码了。

2楼

mr725 发表于：2011/6/22 8:56:00

Null 好像可以呀 , http://www.datasoft.com.cn/dispbbs.asp?boardid=2&Id=10752 3楼的代码就是根据你“关于专业统计工具的问题”一贴中10楼代码改写的，即生成统计表时，数量、金额变为空值。

[此贴子已经被作者于2011-6-22 9:51:36编辑过]

3楼

狐狸爸爸 发表于：2011/6/22 9:02:00

是的，可以的

4楼

reachtone 发表于：2011/6/22 10:59:00

用事实说话:

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目17.table

5楼

狐狸爸爸 发表于：2011/6/22 11:28:00

Dim t As Table = Tables("表A")
t.DataTable.DataCols.Add("测试列",Gettype(Double), "IIf([工资]/444-1 = 0 ,Null,[工资]/444-1 = 0)")

6楼

reachtone 发表于：2011/6/22 11:35:00

我知道这样，我就是想简化代码的。请看看我一楼的发帖意思。。

用了Combine组合统计结果，后面添加了一堆的addcol，再加上判断，看着一堆重复的代码都烦

7楼

狐狸爸爸 发表于：2011/6/22 12:15:00

呵呵，这个简化不了的

8楼

mr725 发表于：2011/6/22 12:29:00

t.Current("测试列") = Nothing 改为：

t.DataTable.dataCols("测试列").Expression = ""
t.DataTable.dataCols("测试列").Expression = Nothing ' 或 "Null"

9楼

reachtone 发表于：2011/6/22 13:10:00

以下是引用mr725在2011-6-22 12:29:00的发言：

t.Current("测试列") = Nothing 改为：

t.DataTable.dataCols("测试列").Expression = ""
t.DataTable.dataCols("测试列").Expression = Nothing ' 或 "Null"

这样一搞，表达式列的数据就全没了。我只是想将0设置为空。

现在只能在表达式列增加判断了。

看看Combine后的扫尾工作，不但要增加表达式列，还要调整列位置，还要隐藏不需要的列，看着这堆没有任何技术含量的代码都很烦：

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

10楼

hhbb 发表于：2011/6/22 13:28:00

哈哈,同烦!

不过应该可以简化点:利用数组及For ...Next

[此贴子已经被作者于2011-6-22 13:30:22编辑过]

共14 条记录, 每页显示 10 条, 页签: [1] [2]