VB.NET使用Combobox从MS SQL数据库中检索数据并用数据填充文本框
我正在开发Visual Studio 2013项目中的VB.Net项目。我想要一个组合框从ms访问数据库中检索数据并填充文本框
我有一个名为DataDB的MS Access DB,我有一个名为Form1的Form1,其上有一个Combobox,名为 cboData ,三个textBox名为txtName,txtPhone和txtAddress。 DataDB保存我的客户姓名,电话和地址。
我想使用ComboBox访问DataDB并使用该值在表单中填充三个textBox Named txtName,txtPhone和txtAddress(load event)
答案 0 :(得分:0)
目前还不清楚你的动机是什么。但据我所知,你想从一个访问数据库填充一个组合框(也许)。然后你可以试试这个
'create a connection string named con
Public sub MyForm_Load
Dim cmd as new OleDbCommand("Select * from [table name here-avoid brackets
if required]",con)
Dim adapter as new OleDbDataadapter(cmd)
Dim table as new datatable
adapter.fill(table)
ComboBox1.DataSource = table
ComboBox1.DisplayMember = table.Columns(3).ToString 'you can use column name or even row
现在,要从组合框向文本框添加文本,请尝试:
Public Sub ComboBox1_IndexChanged
Textbox1.tex=Combobox1.text
如果您认为这不是您想要的,请澄清您的需求
数据表到文本框
For i = 0 To table.Rows.Count - 1
textbox1.Text = table.Rows(i)(3).value.ToString
Next