Foxtable(狐表)用户栏目专家坐堂 → [讨论] 这个简单的计算代码如何写?


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

主题:[讨论] 这个简单的计算代码如何写?

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


加好友 发短信
等级:五尾狐 帖子:1034 积分:7402 威望:0 精华:0 注册:2008/8/31 22:52:00
[讨论] 这个简单的计算代码如何写?  发帖心情 Post By:2008/10/17 11:23:00 [显示全部帖子]

A表有“科目”列,如下:

固定资产清理
固定资产清理
劳务成本\辅助生产\汽车队
劳务成本\辅助生产\汽车队\办公费
劳务成本\辅助生产\汽车队\办公费

我希望“一级科目”列为:
如果“科目”列中包含“\”,则返回第一个“\”左边的汉字;
如果“科目”列中不包含“\”,则返回“科目”列的对应记录;

帮助中这类似的例子少了啊!


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


加好友 发短信
等级:五尾狐 帖子:1034 积分:7402 威望:0 精华:0 注册:2008/8/31 22:52:00
  发帖心情 Post By:2008/10/17 12:00:00 [显示全部帖子]

这个我看得懂啊,

现在我是要计算像这样的一整列:

固定资产清理
固定资产清理
劳务成本\辅助生产\汽车队
劳务成本\辅助生产\汽车队\办公费
劳务成本\辅助生产\汽车队\办公费
.......

我希望得到
固定资产清理
固定资产清理
劳务成本
劳务成本
劳务成本
......


说实话,我主要是对象搞混淆了,不明白“字符”和“一列字符”在写代码时有何不同!如何计算“一列字符”啊?

我没有任何VB编程基础的,确实不易理解不同的对象。

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


加好友 发短信
等级:五尾狐 帖子:1034 积分:7402 威望:0 精华:0 注册:2008/8/31 22:52:00
  发帖心情 Post By:2008/10/17 14:59:00 [显示全部帖子]

我试了半天,正解如下:

 

Dim aa as String = e.datarow("科目名称") '将科目名称赋值给aa
Dim bb as String()                       ’建立一字符数组
bb = aa.split("\")            ‘将bb定义为一个以\分隔的数组
e.datarow("一级科目名称")=bb.(0) '将一级科目名称的值设置为数组bb的第一个值

Next


其实关键是要灵活运用,初学者是经验太不足了。 

 
明白了一样东西:数据行、数据列作为对象,可以赋值给一个变量,再运用各种计算代码得出需要的东西,最后再赋值给另一变量。狐表自己会一行一行地计算的。

[此贴子已经被作者于2008-10-17 15:01:55编辑过]

 回到顶部