CSV для DataTable (DataGridView) или TextBox с использованием vb.net - PullRequest
Новая
       28

CSV для DataTable (DataGridView) или TextBox с использованием vb.net

0 голосов
/ 11 февраля 2019

У меня есть CSV-файл с ";"разделитель, моя проблема состоит в том, чтобы показать его в столбце в DataGridView.

Вот мой код: 

Public Sub WriteCSV(ByRef Counter As UShort, _
ByRef Cycle As UInteger, _
ByRef Temperature As Single, _
ByRef CurrentChannel As Byte, _
ByRef Thk As Single, _
ByRef Flag As Byte, _
ByRef S As UShort, _
ByRef OSig As Byte)

    objWriter = New IO.StreamWriter(CSVPath)

    Dim Text As StringBuilder = New StringBuilder()

    Try
        'If FirstIterationDone = False Then
        '    FirstIterationDone = True
        objWriter.WriteLine("Packet" & ";" & "Cycle" & ";" & "Temperature" & ";" & "Channel" & ";" & "Thickness" & ";" & "Flag" & ";" & "SNR" & ";" & "Signal")
        'End If

        objWriter.Write(Counter.ToString + ";")
        objWriter.Write(Cycle.ToString("F1") + ";")
        objWriter.Write(Temperature.ToString("F1") + ";")
        objWriter.Write(CurrentChannel.ToString + ";")
        objWriter.Write(Thk.ToString("F1") + ";")
        objWriter.Write(Flag.ToString + ";")
        objWriter.Write(S.ToString + ";")
        objWriter.Write(OSig.ToString & Environment.NewLine)

        objWriter.Close()
        objWriter = Nothing

    Catch ex As Exception
        MessageBox.Show(ex.Message)
    End Try

End Sub

Этот код используется каждую секунду, по таймеру, поэтому файл CSVвсегда занят, и я не могу открыть его и отобразить в DataGridView, я думал сделать это до перехвата после закрытия устройства записи, но я не знаю, как это сделать, какие-либо предложения?

...