vb 关于字符获取与MSFlexGrid1自动添加

Question

lise里有 
“数学3456,语文120,物理789” 
“化学468，语文390,政治1257" 
.......................... 
.......................... 
现在点击点击“数学3456,语文120,物理789”这行，然后点击Command1，让第一行的“数学语文物理”字符自动找到MSFlexGrid1.TextMatrix现在所空闲列0行位置，比如说现在从MSFlexGrid1.TextMatrix第五列空闲。那么“数学语文物理”显示在MSFlexGrid1.TextMatrix（5,0)得单元格，让3456显示在当第5列的1行，120在2行，789在3行，依次计算，在点击list当中的第二行，就应该是第六列空闲了，找到第六列，让“化学语文政治”显示在MSFlexGrid1.TextMatrix（6,0)，以此类推。 468在MSFlexGrid1.TextMatrix（6,1)，390在MSFlexGrid1.TextMatrix（6,2)，1257在MSFlexGrid1.TextMatrix（6,3)，
如我点击Command2（全选的意思）那么list当中每一行的数据，还是按照刚才的方式，依次全部显示在 
MSFlexGrid1.TextMatrix5列
显示在MSFlexGrid1.TextMatrix6列 
。 
。 
也就是汉字符是这个列的标题，是在当前列的0行，0行以下是数据
这个怎么写，谢谢老师

Answer 1

上面的列和行写反了，太着急了
lise里有 
“数学3456,语文120,物理789” 
“化学468，语文390,政治1257" 
.......................... 
.......................... 
现在点击点击“数学3456,语文120,物理789”这行，然后点击Command1，让第一行的“数学语文物理”字符自动找到MSFlexGrid1.TextMatrix现在所空闲列0行位置，比如说现在从MSFlexGrid1.TextMatrix第五列空闲。那么“数学语文物理”显示在MSFlexGrid1.TextMatrix（0,5)的单元格，让3456显示在当第5列的1行，120在2行，789在3行，依次计算，在点击list当中的第二行，就应该是第六列空闲了，找到第六列，让“化学语文政治”显示在MSFlexGrid1.TextMatrix（0,6)，以此类推。 468在MSFlexGrid1.TextMatrix（1,6)，390在MSFlexGrid1.TextMatrix（2,6)，1257在MSFlexGrid1.TextMatrix（3,6)， 
如我点击Command2（全选的意思）那么list当中每一行的数据，还是按照刚才的方式，依次全部显示在 
MSFlexGrid1.TextMatrix5列 
MSFlexGrid1.TextMatrix6列 
。 
。 
也就是汉字符是这个列的标题，是在当前列的0行，0行以下是数据 
这个怎么写，谢谢老师 

Answer 2

上面的列和行写反了，太着急了
lise里有 
“数学3456,语文120,物理789” 
“化学468，语文390,政治1257" 
.......................... 
.......................... 
现在点击点击“数学3456,语文120,物理789”这行，然后点击Command1，让第一行的“数学语文物理”字符自动找到MSFlexGrid1.TextMatrix现在所空闲列0行位置，比如说现在从MSFlexGrid1.TextMatrix第五列空闲。那么“数学语文物理”显示在MSFlexGrid1.TextMatrix（0,5)的单元格，让3456显示在当第5列的1行，120在2行，789在3行，依次计算，在点击list当中的第二行，就应该是第六列空闲了，找到第六列，让“化学语文政治”显示在MSFlexGrid1.TextMatrix（0,6)，以此类推。 468在MSFlexGrid1.TextMatrix（1,6)，390在MSFlexGrid1.TextMatrix（2,6)，1257在MSFlexGrid1.TextMatrix（3,6)， 
如我点击Command2（全选的意思）那么list当中每一行的数据，还是按照刚才的方式，依次全部显示在 
MSFlexGrid1.TextMatrix5列 
MSFlexGrid1.TextMatrix6列 
。 
。 
也就是汉字符是这个列的标题，是在当前列的0行，0行以下是数据 
这个怎么写，谢谢老师