Question

在Vb控件MSFLEXGRID中单元格字体的大小如何设置。某一行的字体大小又如何设置。谢谢

Answer 1

MSFlexGrid1.Cols = 6
MSFlexGrid1.Rows = 6
For i = 1 To 5 '1行5列
MSFlexGrid1.TextMatrix(1, i) = "A" & i
Next
'设置某一单元字体大小
MSFlexGrid1.Col = 1
MSFlexGrid1.Row = 1 '设置当前格为(1,1）
MSFlexGrid1.CellFontSize = 8 '字体值由自己设定
'设置某一行字体大小
MSFlexGrid1.FillStyle = flexFillRepeat '把更改应用到所有选定单元
MSFlexGrid1.Col = 1
MSFlexGrid1.Row = 1
MSFlexGrid1.ColSel = MSFlexGrid1.Cols - 1 '和col属性联用选中第1到第5列,
MSFlexGrid1.CellFontSize = 10 '经过fillstyle设置效果应用到选定单元