将某些DataGridView列导出为文本文件(.inp)格式

Question

我想导出我的datagridview文本文件，但不是所有的7列。

我只想导出用">;分隔的3列"。

例如:Column1 Value;column2 Value;column Value

Answer 1

如果您不担心完美的性能，您可以这样做:

Dim x,y as integer
Dim sLine as string 
FileOpen(1, "C:samplefile.csv", OpenMode.Output) ' change to your path
For y = 0 To DataGridView1.Rows.Count - 1
sLine = ";"
For x = 0 To DataGridView1.Columns.Count-1
if x=1 OrElse x=3 OrElse x=5 then
sLine = sLine & DataGridView1.Rows(y).Cells(x).Value.ToString & ";"
End if
Next x
PrintLine(1, sLine)
Next y
FileClose(1)

行:x=1 OrElse x=3 OrElse x=5，是您想要的列数，只需调整。你也可以使用像Dim iColsIWant这样的数组作为Integer ={1,3,5}，并将它们用作X变量。如果你想包含datagridview的头文件，在FileOpen之后你可以这样写，例如:

PrintLine (1,";Name;Date;Value;")