MSFlexGrid1.Rows = 15
MSFlexGrid1.Cols = 15
MSFlexGrid1.FixedRows = 0
MSFlexGrid1.FixedCols = 0
For i = 0 To MSFlexGrid1.Rows - 1
MSFlexGrid1.Row = i
For j = 0 To MSFlexGrid1.Cols - 1
MSFlexGrid1.Col = j
MSFlexGrid1.Text = j + i
Next j
Next i
你直接到百度文库去看,很多