求救！怎样将DatagridView中的数据以CSV格式保存到本地电脑上

[tian1982]

怎样将DatagridView中的数据以CSV格式保存到本地电脑上？

[zv2002]

intFileNumber = FreeFile()
' strFileName 是你要保存的路径
FileOpen(intFileNumber, strFileName, OpenMode.Output)
For i = 0 To grdSignal.Rows.Count - 1
strLine = ""
For j = 0 To grdSignal.ColumnCount - 1
If j = grdSignal.ColumnCount - 1 Then
strLine = strLine & grdSignal.Rows(i).Cells(j).Value & vbCrLf
Else
strLine = strLine & grdSignal.Rows(i).Cells(j).Value & ","
End If
Next
Print(intFileNumber, strLine)
Next
FileClose(intFileNumber)

[tian1982]

谢谢你的回复
intFileNumber FreeFile 分别 是什么啊？

[zv2002]

dim intFileNumber as integer
intFileNumber = FreeFile()

FreeFile 得到空闲的文件号，用这个函数取得文件号可以避免文件号的冲突

你可以查阅MSDN，里面有详细说明，也有代码例子

给你的代码你把变量改改，该声明的声明，直接能用

[tian1982]

谢谢，我今天试一下