vb mshflexgird1定位问题

Question

我用mshflexgrid1控件显示数据库的数据，然后不停的1秒钟读一次数据库中的数据，同样数据库也是在不停的一秒读一次原来的数据，将从数据库里读出来的数据和mshflexgrid1显示的数据进行对比，如果数据有变化就将该变化的单元格的颜色变为兰色和高亮，这个变颜色和显示高亮持续时间为10秒，10后回复原来背景颜色，如果同一个单元格在5秒间变动两次或三次，则每一次，都把该单元格恢复变色为10秒，如：列：col=5：行：row=5，在第二秒数据有变化则其单元格背景颜色变为兰色并高亮，时间为10，但时间过了2秒，既此时背景颜色存在的时间还有8秒的时候，该单元格的数据又发生变化，此时又重新把该单元变色和高亮，时间更改为持续10秒，同时其他单元格的数据也会因数据库的数据变化而变化，处理方式都是一样，并把新数据赋给相应的项目，若从数据库读到新项目则在mshflexgrid1控件中另起一行显示新项目，如此不停的重复，请高手们不吝指点，谢谢

Answer 1

.row=5
.col=2
这样就定位了一个cell
 .CellBackColor = vbRed
这样就改变了颜色时间的话，放在timer中写代码

Answer 2

这个我知道，只是我不懂我该怎么把时间定位10秒且每一秒都在变化，一有变化又要重新把时间定位为10秒背景颜色也变色，我现在就不明白这些，希望你能帮帮我，在timer里要怎么实现，谢谢

Answer 3

ddate(datetime)       goods                state        re
    2007-05-11 15:01:03    移动硬盘              1             新
    .......... .....        ....                 2             ...
    ................       .......               ...         .....
    2007-05-12 15:35:56    内存                  1             新
    .................      ....                  3             ...
    ..................     .....                  ...        .....
    2007-05-13 19:25:34    硬盘1                 1             新
    2007-05-13 09:26:21    硬盘2                 1             新
    ..................     .....                 ..           ....
    2007-05-14 08:25:32    存储器                1             新
    2007-05-14 16:05:23    存储器                1             新 
    ....................   ......                ..            ...rsS.open "select * from a where goods='移动硬盘' and state>=2, Conn, adOpenStatic, adLockOptimistic奇怪的是不管将条件判断goods='移动硬盘' and state>=2的位置怎么放系统只用条件goods='移动硬盘'而不识别state>=2，也就是说所以的语句包括state=1的都读下来了，希望高手们帮我解决啊，小弟感激不尽