اضافه كردن valuemember به يك listbox

[milad.biroonvand]

سلام دوستان

من مي خوام به يك listbox يك آيتم اضافه كنم ، كه اين آيتم داراي يه مقدار value هم هست . شايد ديده باشيد ، موقعي كه ما يك ديتاست رو به lisbox وصل مي كنيم . مي تونيم ، دو خصيصه valuemeber و displaymember رو اضاقه كنيم ، حالا اگر بخواهيم يك آيتم با دستور lisbox.items.add اضافه كنيم ، چطور مي تونيم مقدار valuemeber و displaymember را اضافه كنيم .

نكته) يه راه به نظر من استفاده از table است .

[ACorvinus]

سلام.



Dim Source As New DataTable
'You Must Fill This DataTable ---> Source
'Source DataTable Columns Name: 'ID', 'UserID', 'Address', 'Name', 'Family', etc.
ListBox.ValueMember = "UserID"
ListBox.DisplayMember = "Name"
ListBox.DataSource = Source



اگه راه دیگه ای هم بود دوست دارم یاد بگیرم.
موفق باشید.

[milad.biroonvand]

سلام دوست عزيز

منم الان از همين روش استفاده مي كنم ، من راهي رو مي خوام كه بتونم ، فقط يك آيتم رو اضافه بكنم .

من خودم هم از datatable يا dataset استفاده مي كنم .

[Alghoochi]

سلام دوستان

من مي خوام به يك listbox يك آيتم اضافه كنم ، كه اين آيتم داراي يه مقدار value هم هست . شايد ديده باشيد ، موقعي كه ما يك ديتاست رو به lisbox وصل مي كنيم . مي تونيم ، دو خصيصه valuemeber و displaymember رو اضاقه كنيم ، حالا اگر بخواهيم يك آيتم با دستور lisbox.items.add اضافه كنيم ، چطور مي تونيم مقدار valuemeber و displaymember را اضافه كنيم .

نكته) يه راه به نظر من استفاده از table است .
میشه یکم بیشتر توضیح بدید. من سوال شما رو درست متوجه نشدم

[milad.biroonvand]

میشه یکم بیشتر توضیح بدید. من سوال شما رو درست متوجه نشدم

سلام

من می خوام ، یک آیتم به listview اضافه بکنم ، بطوریکه ، بتونم خصیصه displaymember و valuemember رو بتونم با اون set بكنم.

اينكار ، رو از با datsource انجام ميشه ، ولي با يك آيتم تكي نمي تونم .

[sari-1369]

شما باید از DataTable استفاده کنید ، به این صورت که هر تغیری خواستین بدین ( آیتمی اضافه یا حذف کنین ) روی همون DataTable انجام بدین . 3 تا تابع براتون نوشتم که این کارو راحت میکنه. هرطور خواستین میتونین تغییرشون بدین.

Dim Dt As New DataTable

Private Sub SetDataSource(ByVal DisplayMemberColumnsName As String, ByVal ValueMemberColumnsName As String)
ListBox1.DisplayMember = DisplayMemberColumnsName
ListBox1.ValueMember = ValueMemberColumnsName
ListBox1.DataSource = Dt
End Sub

Private Sub insert(ByVal DisplayMemberColumnsName As String, ByVal ValueMemberColumnsName As String, ByVal DisplayMemberValue As String, ByVal ValueMemberValue As String)
Dim row As DataRow
row = Dt.NewRow()
row(ValueMemberColumnsName) = ValueMemberValue
row(DisplayMemberColumnsName) = DisplayMemberValue
Dt.Rows.Add(row)
End Sub

Private Sub Delete(ByVal index As Integer)
Dt.Rows(index).Delete()
End Sub

[milad.biroonvand]

سلام دوست عزيز

با تشكر از جوابتون ، پس آيا هيچ راهي ديگه وجود نداره

[sari-1369]

سلام دوست عزیز

با تشکر از جوابتون ، پس آیا هیچ راهی دیگه وجود نداره

شاید وجود داشته باشه ، ولی من یلد نیستم.

[milad.biroonvand]

سلام

منتظر مي مونيم ، اگر كسي بلد بود اينجا بزاره .