VB编程 文本数据导入到MSFlexGrid表格
没有分了,请高手帮忙。按照下面表格的方式将文本文件的数据导入到MSFlexGrid表格。表格3列,1000行以内,固定1行0列,第一列是根据导入的数据填写序号,第二列填写...
没有分了,请高手帮忙。
按照下面表格的方式将文本文件的数据导入到MSFlexGrid表格。
表格3列,1000行以内,固定1行0列,第一列是根据导入的数据填写序号,第二列填写导入的数据,第三列填写导入数据的次数。
序号 数据 次数
1 100 1
2 205 1
3 304 1
4 316 1
5 368 1
6 468 1
7 536 1
8 537 1
9 894 1
10 964 1
谢谢了。
序号 数据 次数
1 100 1
2 205 1
3 304 1
4 316 1
5 368 1
6 468 1
7 536 1
8 537 1
9 894 1
10 964 1
原来发的数据太乱,重新发一下,导入的数据N个,但是不会超过1000。 展开
按照下面表格的方式将文本文件的数据导入到MSFlexGrid表格。
表格3列,1000行以内,固定1行0列,第一列是根据导入的数据填写序号,第二列填写导入的数据,第三列填写导入数据的次数。
序号 数据 次数
1 100 1
2 205 1
3 304 1
4 316 1
5 368 1
6 468 1
7 536 1
8 537 1
9 894 1
10 964 1
谢谢了。
序号 数据 次数
1 100 1
2 205 1
3 304 1
4 316 1
5 368 1
6 468 1
7 536 1
8 537 1
9 894 1
10 964 1
原来发的数据太乱,重新发一下,导入的数据N个,但是不会超过1000。 展开
1个回答
展开全部
步骤:
1、打开这个文本文件,将内容存到变量中(tempstr)
2、dim arrStr() as string
arrStr=split(tempstr,vbcrlf)
3、MSFlexGrid.rows=ubound(arrStr)+1
4、for i=0 to ubound(arrStr)
dim arrTemp() as string
arrTemp=split(arrStr(i),chr(32))
for j=0 to ubound(arrTemp)
MSFlexGrid.textmatrix(i,j)=arrTemp(j)
next
next
补充:也可以按行读入文本之后载入到MSFlexGrid中,方法类似。你可以思考一下。
1、打开这个文本文件,将内容存到变量中(tempstr)
2、dim arrStr() as string
arrStr=split(tempstr,vbcrlf)
3、MSFlexGrid.rows=ubound(arrStr)+1
4、for i=0 to ubound(arrStr)
dim arrTemp() as string
arrTemp=split(arrStr(i),chr(32))
for j=0 to ubound(arrTemp)
MSFlexGrid.textmatrix(i,j)=arrTemp(j)
next
next
补充:也可以按行读入文本之后载入到MSFlexGrid中,方法类似。你可以思考一下。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询