msflexgrid fontsize求助

Question

mshlexgrid1.Font.Size = mshlexgrid1.Font.Size + 1
为什么只改变固定行字体大小?
mshlexgrid1.cellfontsize =mshlexgrid1.cellfontsize+1又太慢
我该怎么办?郁闷ing..........

Answer 1

Private Sub Command1_Click()
MSHFlexGrid1.Font.Size = MSHFlexGrid1.Font.Size + 1
End Sub
Private Sub Form_Load()
MSHFlexGrid1.Rows = 10
MSHFlexGrid1.Cols = 10
For I = 0 To 9
For j = 0 To 9
MSHFlexGrid1.TextMatrix(I, j) = I & j
Next
Next
End Sub
不存在mshlexgrid1.Font.Size = mshlexgrid1.Font.Size + 1 
为什么只改变固定行字体大小? 的问题

Answer 2

我现在就遇到这种问题
用for next循环设置的做法不可取

Answer 3

mshflexgrid也有类似于指针的一个东西，是每行每行进行操作的

Answer 4

我加了一个固定列又可以了
真不明白是为什么 
现在又遇到了新问题了
每当MSHFlexGrid1.Font.Size = MSHFlexGrid1.Font.Size + 1 时
所有的列宽 都变成自动适应字体大小了 
MSHFlexgrid有哪属性是控制自动列宽的?

Answer 5

用for next循环只是添加数据,和测试字号无关
Private Sub Command1_Click()
MSHFlexGrid1.Font.Size = MSHFlexGrid1.Font.Size + 1
End Sub
单击一次所有的行与列中的字符字号都加1.

Answer 6

您的方法我明白 
我的意思是不想用for next 设置字体

Answer 7

这个我知道
我只是不明白为什么我在设置了
formatstring 和colwidth 后
再font.size+1 列宽就改变了