VB.NET如何在listbox中显示数据库的某一字段的内容(ACCESS)

我请说下,VB.NET如何在listbox中显示数据库的某一字段的内容(ACCESS)?

比方我要显示表"凭证字"的字段,字段名"凭证字",给代码吧,代码尽量全!从private sub Form_load到end sub
已有代码
dim sqlstring as string="select 凭证字 from 凭证字"
Dim connstr as String="Provider=Microsoft.Jet.Oledb.4.0;"& "Data source=rent.mdb
dim gt as new dataTable
dim dataAdapter as new OleDb.OleDbDataAdapter(sqlstring,connStr)
之后如何写代码才能在LISTBOX中显示数据库中凭证字字段的内容
最新回答
客情寄风絮

2024-10-31 06:08:47

Private Sub frmInput_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
dim sqlstring as string="select 凭证字 from 凭证字"
Dim connstr as String="Provider=Microsoft.Jet.Oledb.4.0;"& "Data source=rent.mdb"
Dim ConnTemp As New OleDb.OleDbConnection
Dim RSTemp As OleDb.OleDbDataReader
ConnTemp.ConnectionString = connstr
Dim CmdTemp As New OleDb.OleDbCommand(sqlstring, ConnTemp)
ConnTemp.Open()
RSTemp = CmdTemp.ExecuteReader
Do While RSTemp.Read
ListBox1.Items.Add(RSTemp(0))
Loop
RSTemp.Close()
conntemp.close