[戻]-35401/親

---

グリッド表示レコードをJSONに変換

---

けい

最初--em.Runtime.Serialization.Json.DataContractJsonSerializer(GetType(Shohin))
Dim ms As New MemoryStream()
Dim output As String
For i = 0 To 2
data(i) = New Shohin
data(i).商品C = DataGridView1.Rows(i).Cells(0).Value
data(i).商品名 = DataGridView1.Rows(i).Cells(1).Value
sw.WriteObject(ms, data(i))
Next
output = Encoding.UTF8.GetString(ms.ToArray())
TextBox1.Text = output
End Sub

上記のコードを実行しますと、
表示結果が、
次のようになります。

{"商品C":10000,"商品名":"商品A"}
{"商品C":10001,"商品名":"商品B"}
{"商品C":10002,"商品名":"商品C"}

これですと、｛｝の間にカンマ（,）がついておりません。
{"商品C":10000,"商品名":"商品A"}
,{"商品C":10001,"商品名":"商品B"}
,{"商品C":10002,"商品名":"商品C"}
のようにしたいです。

上記Forループ内で、 -->続き

05/01 17:08
[編|消]

---

ﾚｽを書く
1番最初のﾚｽ

---

Child K-Tai