如何用msflexgrid来实现或者有其他的办法？

Question

不用绑定，使用单元格的填写方式。
在填写的过程中判断，更改backcolor

Answer 1

dim i as long
dim j as longfor i = 1 to msflexgrid.rows-1
   if msflexgrid.textmatrix(i,1)<> "" then
       .row = i
       for j = 1 to msflexgrid.cols
          .col =j
          .cellbackcor =vbbule
       next j
   end if
next i不过没有什么用，你为什么要这样做呢？

Answer 2

for j = 1 to msflexgrid.cols改为for j = 1 to msflexgrid.cols -1
          

Answer 3

看来我说得不够明白，我在做查询，根据不同的查询条件生成一个表，我用msflexgrid来显示，对于不同的查询条件，我用不同的表格颜色来表示，比如说，客户第一次找的是“北京”，我就让这一条的背景色是蓝色，下面的所有的记录都是现实满足“北京”这个条件的记录，第二次找的是“上海”，我紧接着北京的之后加一条记录，背景色用红色，这条记录下面所有的记录都是满足“上海”以此类推，最后生成一张查询表，不同的颜色代表不同的查询条件，我一直都使用sql语句来实现查询的，所以不好每一条记录都进行判断，请您帮忙！

Answer 4

要控制第1行第1列的底色为蓝色，如下写代码：
    With msflexgrid
        .Col = 1
        .Row = 1
        .CellBackColor = vbBlue
    End With