VB编程：利用二位数组MSHFlexGrid表格添加数据-33
运行效果：
程序代码：
Private Sub Form_Load()
Dim i, j As
Integer
Me.MSHFlexGrid1.Cols =
8
Me.MSHFlexGrid1.Rows =
15
For j = 0 To
Me.MSHFlexGrid1.Cols - 1
'从第一列到最后一列遍历循环
Me.MSHFlexGrid1.ColAlignment(j) = 3
'列内容顶部居中
For i = 0 To Me.MSHFlexGrid1.Rows - 1
'从第一行到最后一行遍历循环
Me.MSHFlexGrid1.TextMatrix(i, j) = i * j
'单元格的数值等于坐标乘积
Next i
Next j
End Sub
学习心得：
1、添加部件"Microsoft Hierarchical FlexGrid Control 6.0
(OLEDB)"才能使用MSHFlexGrid.
Col：列，Row：行。
Cols：总列数；Rows：总行数。
ColWidth：列宽；RowHeight：行高。
ColAlignment：列对齐；CellAlignment：单元对齐。