把所有数据先都写入一个内存变量,然后一起放入MsFlexgrid控件。
列之间的分隔符是chr(9),行之间的分隔符是chr(13)。见如下代码:Private Sub Command1_Click()MSFlexGrid1.Rows = 21
MSFlexGrid1.Cols = 4
s = ""
cc = Chr(9)
For i = 1 To 20
s = s + Str(i) + cc + Str(i * 2) + cc + Str(2 ^ i) + Chr(13)
Next i
MSFlexGrid1.Row = 1
MSFlexGrid1.Col = 0
MSFlexGrid1.RowSel = 20
MSFlexGrid1.ColSel = 3
MSFlexGrid1.Clip = sEnd Sub
列之间的分隔符是chr(9),行之间的分隔符是chr(13)。见如下代码:Private Sub Command1_Click()MSFlexGrid1.Rows = 21
MSFlexGrid1.Cols = 4
s = ""
cc = Chr(9)
For i = 1 To 20
s = s + Str(i) + cc + Str(i * 2) + cc + Str(2 ^ i) + Chr(13)
Next i
MSFlexGrid1.Row = 1
MSFlexGrid1.Col = 0
MSFlexGrid1.RowSel = 20
MSFlexGrid1.ColSel = 3
MSFlexGrid1.Clip = sEnd Sub
问题2:需要设置一个BOOLEAN参数。属性时,根据参数判断,就可以避免跳格现象
在更改内容时,使用API函数(我忘了是那个API)禁止控件更新,在适当的时候调用API更新显示