Dim i As Integer
For i = 1 To Me.MSHFlexGrid1.Rows - 2
Me.MSHFlexGrid1.RemoveItem 1
Next imshflexgrid1的最后一行非固定行市不能删除的!

解决方案 »

  1.   

    MSHFlexGrid1.Rows=MSHFlexGrid1.FixedRows
      

  2.   

    to:progame(来来往往,不知所云.......) 这样不行的,把固定行弄没了!
      

  3.   

    还要那么麻烦啊
    grid1.rows=2
    不就行了
      

  4.   

    同意program兄,但是还漏了一点,最后一个非固定行没有清空
    完整的应该是MSHFlexGrid1.AddItem "",MSHFlexGrid1.FixedRows 
    MSHFlexGrid1.Rows=MSHFlexGrid1.FixedRows 
      

  5.   

    junglerover(灌木丛):我的名字没有后面那个r啊:(programe这么大气的名字小的哪敢用啊:(
      

  6.   

    假设FixedRows=n(n>=0),那么只要Msflexgrid.rows=n就可以了。
      

  7.   

    mshflexgrid1.rows=mshflexgrid1.fixedrows
    mshflexgrid1.rows=2
    mshflexgrid1.fixedrows=mshflexgrid1.fixedrows