اضافه كردن 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]

سلام

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