PDA

View Full Version : كمك درمورد كمبو باكس



oracle_2007
شنبه 11 خرداد 1387, 23:52 عصر
سلام دوستان

من ميخوام كمبو باكس رو به طريقه اي پر كنم كه وقتي يكي از آيتم هاي اون رو انتخاب مي كنم مقدار دومي كه مد نظرم هست در تكست باكس گذاشته بشه .
مثلا وقتي كمبو رو با نام افراد پر ميكنم مي خوام فاميلي اون شخصي كه از كمبو سلكت كردم در يه تكست باكس نشون داده بشه . با كد زير فقط فاميلي آخرين فرد رو دارم .
كدي مربوطه اينه :


Dim con As New SqlClient.SqlConnection(strCon)
Dim strsql As String = "select name,Family from tbl_person ORDER BY name ASC"
Dim cmd As New SqlClient.SqlCommand(strsql, con)
con.Open()
Dim rdr As SqlClient.SqlDataReader = cmd.ExecuteReader
While rdr.Read()
Cmb_person.Tag = rdr("Family")
Cmb_person.Items.Add(rdr("name"))

End While
con.Close()
cmd.Dispose()
con.Dispose()

و در رويداد Cmb_person_SelectedIndexChanged هم نو شتم :


Me.txt_family.Text = Cmb_person.Tag.ToString

ممنون ميشم كمكم كنين .

Dariuosh
یک شنبه 12 خرداد 1387, 00:15 صبح
1- خدا خوش مياد اگه از Tag کد استفاده کني
2- حتماً اگه ميگشتي جوابتو پيدا ميکردي
3- هر کمبو باکس يه DisplayMember داره و يه ValueMember که اولي ديده ميشه و دومي مقداريه که ميخواي ازش استفاده کني
4- به جاي اينکه با DataReader کمبو باکست رو پر کني يه DataTable تعريف کن و اول اونو پر کن بعد کمبو رو به اون وصل کن اينطوري


With Me.ComboBox1
.DataSource = DtTable
.DisplayMember = "Name"
.ValueMember = "Family"
End With

5- موفق باشي

oracle_2007
سه شنبه 14 خرداد 1387, 13:15 عصر
سلام . من اين كار رو كردم ولي نشد !!! اگه لطف كنين و يه نمونه عملي(مثال) با بانك اكسس برام بذارين ممنون ميشم .

Dariuosh
سه شنبه 14 خرداد 1387, 14:51 عصر
مثال
فقط Access 2007 و VS2008 اگه نتونستي بازش کني بگو

oracle_2007
سه شنبه 14 خرداد 1387, 16:35 عصر
شرمنده .
اكسس من 2003 و vs2005 هست .
اگه براي ليست ويو هم يه نمونه بذارين يه دنيا ممنون ميشم .

Dariuosh
سه شنبه 14 خرداد 1387, 17:24 عصر
برايه استفاده کردن از مقدار ComboBox بايد SelectValue استفاده کني


TextBox1.Text = Me.ComboBox1.SelectedValue
Me.ListView1.Items.Add(Me.ComboBox1.SelectedValue)


اين کدو تو روال ComboBox1.SelectedIndexChanged بزار اونوقت با هر تغيير تو Combo انجام ميشه
اگرم ديدي نشد تو يه پروژه بزار

راستي تو اون کدي که گفتم به DataTabe وصلش کن مشکلت چي بود DataTable رو نتونستي پر کني يا ...

oracle_2007
چهارشنبه 15 خرداد 1387, 02:27 صبح
ممنونم مشكلم با كمبو حل شد . ولي ليست ويو با DataTabe پر نمي شه ؟!!!!! ولي خيلي راحت با ديتا ريدر پرش ميكنم .