程序代码：

MSFlexGrid1.Cols = 7
MSFlexGrid1.Rows = 200 + 1
MSFlexGrid1.Col = 0
For I = 1 To 200
MSFlexGrid1.Row = I: MSFlexGrid1.TextMatrix(I, 0) = " " + Str$(I)
Next I

 MSFlexGrid1.TextMatrix(0, 1) = "S1"

 MSFlexGrid1.TextMatrix(0, 2) = "S4"

 MSFlexGrid1.TextMatrix(0, 3) = "S2"

 MSFlexGrid1.TextMatrix(0, 4) = "S3"

 MSFlexGrid1.TextMatrix(0, 5) = "α"

 MSFlexGrid1.TextMatrix(0, 6) = "β"
MSFlexGrid1.TextMatrix(num, 1) = filedata3(num)
   MSFlexGrid1.TextMatrix(num, 2) = filedata6(num)
   MSFlexGrid1.TextMatrix(num, 3) = filedata5(num)
   MSFlexGrid1.TextMatrix(num, 4) = filedata4(num)
   MSFlexGrid1.TextMatrix(num, 5) = filedata1(num)
   MSFlexGrid1.TextMatrix(num, 6) = filedata2(num)