关于MSHFlexGrid的数据保存问题

[raingiggs]

我想把MSHFlexGrid里面的数据直接保存成为文本形式(*.txt),而不保存在数据库里面,请问大家,应该怎么保存啊?谢谢指教

[outorenter]

Open "文件名" For 模式 As [#]文件号 [Len=记录长度]
文件号是介于1 - 511 之间的整数

[yiway]

自己写一个函数吧
Public sub saveFlexGridtoFile(Flex1 as Object,Filename as string)
open filename as #1

dim i as integer,j as integer
for i=0 to Flex1.Rows
for j=0 to Flex1.Cols
Print #1,Flex1.textmatrix(i,j) & " "
next j
Print #1,vbcrlf
next i
close #1
end sub

[normandj]

用.textmatrix(row,col)循环读出来，根据你的需要保存就行了。

[raingiggs]

to yiway(一味):请问#1是什么意思?:)

to normandj(norman) :能不能一次读取整行啊?

[CatchWind]

使用vsFlexGrid控件,可直接保存為文件(有此方法)

[raingiggs]

ttttttttttttttt