Using writer As New StreamWriter("C:\Users\nsc\Desktop\STEP4出力先\costomerichiran.csv",
False, Encoding.Default)
Dim save As New SaveFileDialog ''カラムのCSV出力 Dim strList1 As New List(Of String) For i = 0 To DataGridView1.ColumnCount - 1 strList1.Add(DataGridView1.Columns(i).HeaderText.ToString) Next Dim strary1 As String() = strList1.ToArray Dim strCsvData1 As String = String.Join(",", strary1) writer.WriteLine(strCsvData1) ''RowのCSV出力 For i = 0 To DataGridView1.Rows.Count - 1 Dim strList As New List(Of String) For j = 0 To DataGridView1.ColumnCount - 1 strList.Add(DataGridView1(j, i).Value.ToString()) Next Dim strary As String() = strList.ToArray Dim strCsvData As String = String.Join(",", strary) writer.WriteLine(strCsvData) Next End Using
上記のコードでcsvに保存はできているのですがユーザーの任意の場所にほぞんできるようにしたいんのですがどうしたらよろしいでしょうか?
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2016/01/26 06:42