请帮忙解决VB中条件追加的代码

请帮忙解决VB中条件累加的代码
如题， 具体逻辑如下：

数据库有一串Data String有99个循环值（每个值叫Data Line），而在每个Data Line中又有10个值分别为5组的循环值(Code & Amount)。

要实现的是，把所有99个Data Line内 相同的 Code所对应的Amount进行累加，而且在输出行里 相同的Code 只能输出一次。

如：DataLine1 C1, 100, D1, 200, E1, 300, F1, 400, G1, 500; 
    DataLine1 C1, 80, D1, 90, E1, 120, F1, 180, G1, 260;

实现为  C1*180
        D1*290
        E1*420
        F1*580
        G1*760

因为里面有2个循环，请各位高手不吝赐教。

谢谢。 数据库 string
[解决办法]
split后存入数据库
然后select sum(value) from table group by name
[解决办法]
看你的另一个帖子。不重发了。