Crestfallen
شنبه 29 بهمن 1384, 14:31 عصر
سلام
یه drop down list دارم که ایتمهای اون توسط از دیتا بیس خوانده میشوند
حالا وقتی میخوام خصیصه text هر ایتم رو بدست بیارم نمی تونم و فقط میشه ارزش اولین ایتم رو بدست آورد
اینم کدش
Public Sub Page_Load()
Dim con As OleDbConnection
Dim cmd As OleDbCommand
Dim dtr As OleDbDataReader
con = New OleDbConnection("provider = microsoft.jet.oledb.4.0 ; data source =c:\dbs.mdb")
cmd = New OleDbCommand("select grade from grade ", con)
con.Open()
dtr = cmd.ExecuteReader
Dim i As String
i = 0
Dim s As String
While dtr.Read
s = dtr("grade")
dropdown.Items.Insert(i, s)
i += 1
End While
End Sub
Public Sub Button1_Click()
lable1.Text = dropdown.SelectedItem.Text
End Sub
با تشکر
یه drop down list دارم که ایتمهای اون توسط از دیتا بیس خوانده میشوند
حالا وقتی میخوام خصیصه text هر ایتم رو بدست بیارم نمی تونم و فقط میشه ارزش اولین ایتم رو بدست آورد
اینم کدش
Public Sub Page_Load()
Dim con As OleDbConnection
Dim cmd As OleDbCommand
Dim dtr As OleDbDataReader
con = New OleDbConnection("provider = microsoft.jet.oledb.4.0 ; data source =c:\dbs.mdb")
cmd = New OleDbCommand("select grade from grade ", con)
con.Open()
dtr = cmd.ExecuteReader
Dim i As String
i = 0
Dim s As String
While dtr.Read
s = dtr("grade")
dropdown.Items.Insert(i, s)
i += 1
End While
End Sub
Public Sub Button1_Click()
lable1.Text = dropdown.SelectedItem.Text
End Sub
با تشکر