ذخیره ی آیتمهای انتخاب شده در چک لیست باکس کنترل

[likemoon]

سلام
چطوری میشه آیتم های انتخاب شده در چک لیست باکس کنترل رو در یک فیلد دیتابیس به صورت رشته ذخیره کرد؟؟؟
(بایند شده به دیتابیس و آیتم های مورد نظر خودشون استرینگ هستند)

[likemoon]

Dim str = ""
For Each item In CheckedListBoxTests.CheckedItems
str += item.ToString() + ","

Next



این کد دیتا ها رو به این شکل ذخیره میکنه لطفا بگید مشکلش کجاست؟

System.Data.DataRowView,System.Data.DataRowView,Sy stem.Data.DataRowView,

[Hossis]

مشکل اینجاست که آیتم های لیست باکس از نوع رشته ای نیستند بکه از نوع دیتا هستند.
شما باید اول آیتم ها رو به صورت رشته در بیارید بعد با حلقه For اونها رو به یک رشته کلی تبدیل کنید
پیشنهاد میشه که بین آیتم ها کاراکتر ویرگول نگذارید بلکه بهتره vbnewline بگذارید.

[likemoon]

این کد جواب میده

Dim str = ""
For Each item_loopVariable In CheckedListBoxServices.CheckedItems
Dim ro As DataRowView = TryCast(item_loopVariable, DataRowView)
str &= ro("TestName").ToString() & ","

Next