[VB.NET]vb.net中 listbox 问题
发布时间：2020-12-16 23:45:54 所属栏目：大数据 来源：网络整理
导读：vb.net中 listbox 问题 vb.net中 listbox控件 数据通过数据库绑定 显示多条记录 设为多选后 在界面上选择两条以上记录时 后台怎样能够取得所选记录的值 为什么我取得总是system........之类的 ____________________________________________________________
|
vb.net中 listbox 问题 vb.net中 listbox控件 数据通过数据库绑定 显示多条记录 设为多选后 在界面上选择两条以上记录时 后台怎样能够取得所选记录的值 为什么我取得总是system........之类的 __________________________________________________________________________ Me.ListBox1.SelectedItems(0).ToString() Me.ListBox1.SelectedItems(1).ToString() 这样就行了吧？ __________________________________________________________________________ Dim i As Integer For i = 0 To ListBox1.SelectedItems.Count - 1 MessageBox.Show(Me.ListBox1.SelectedItems(i).ToString()) Next __________________________________________________________________________ listbox 绑定代码 ListBox1.DataSource = Db.OraDataView ListBox1.DisplayMember = “字段名” 取值 For i As Integer = 0 To ListBox1.SelectedItems.Count - 1 MessageBox.Show(Me.ListBox1.SelectedItems(i).ToString()) Next 显示为： System.Data.DataRowView 而不是我数据库里的值 这是怎么回事啊 __________________________________________________________________________ While Rd.Read() ListBox1.Items.Add(Rd.Item( "a ")) End While 绑定后再测试没有问题! __________________________________________________________________________ Rd 是什么啊 __________________________________________________________________________ Dim Conn As OleDbConnection Dim Cmd As OleDbCommand Dim Rd As OleDbDataReader Dim SQL As String Dim Adpt As OleDbDataAdapter Dim Ds As DataSet Dim Provider = "Provider=Microsoft.Jet.OLEDB.4.0 " Dim Database = "Data Source= " & Application.StartupPath() & "/db1.mdb " Conn = New OleDbConnection(Provider & "; " & Database) Conn.Open() ''打开数据库 SQL = "Select * From one " Cmd = New OleDbCommand(SQL,Conn) Rd = Cmd.ExecuteReader() While Rd.Read() ListBox1.Items.Add(Rd.Item( "a ")) End While Rd.Close() Conn.Close() __________________________________________________________________________ （编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |