讀取 有 DataGridView 既 Record 後 寫入 Text File
Form1.vb |
Imports System.IO Private Sub SaveFile(ByVal FileName As String) Dim objStreamWriter As New StreamWriter(FileName) Dim A As String = DataGridView1.Columns(0).Name Dim B As String = DataGridView1.Columns(1).Name objStreamWriter.WriteLine(A & "|" & B) For index As Integer = 0 To DataGridView1.RowCount – 1 A = DataGridView1.Rows(index).Cells(0).Value B = DataGridView1.Rows(index).Cells(1).Value objStreamWriter.WriteLine(A & "|" & B) Next objStreamWriter.Close() End Sub |