ComboBox 绑定的问题

czh402 2008-07-25 10:02:32
我怎么将 employee表中的字段name和combobox1绑定起来,运行后 combobox1 里面内容还是空。下面的代码是不是有问题


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim mydataset As DataSet = New DataSet()

Dim conn As New System.Data.SqlClient.SqlConnection
Dim cnstr As String = "Data Source=(local);Initial Catalog=huamn;Integrated Security=True,use id=sa,pwd="
conn.ConnectionString = cnstr

Dim comm As New System.Data.SqlClient.SqlCommand()
comm.CommandText = "SELECT * FROM employee"
comm.Connection = conn

Dim dataap As New System.Data.SqlClient.SqlDataAdapter
dataap.SelectCommand = comm

dataap.Fill(mydataset)

ComboBox1.DataSource = mydataset.Tables("employee")
ComboBox1.DisplayMember = "name"
End Sub
...全文
56 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
hmilj245216 2008-07-25
  • 打赏
  • 举报
回复
dataap.Fill(mydataset,"employee")
czh402 2008-07-25
  • 打赏
  • 举报
回复
谢谢 fly_goldfish

已经好了,谢谢~!~!
rangeon 2008-07-25
  • 打赏
  • 举报
回复
不精通VB.NET,不过感觉好像最后少了一句Combobox1.DataBind()
万小萌 2008-07-25
  • 打赏
  • 举报
回复
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim mydataset As DataSet = New DataSet()

Dim conn As New System.Data.SqlClient.SqlConnection
Dim cnstr As String = "Data Source=(local);Initial Catalog=huamn;Integrated Security=True,use id=sa,pwd="
conn.ConnectionString = cnstr

Dim comm As New System.Data.SqlClient.SqlCommand()
comm.CommandText = "SELECT * FROM employee"
comm.Connection = conn

Dim dataap As New System.Data.SqlClient.SqlDataAdapter
dataap.SelectCommand = comm

dataap.Fill(mydataset)

ComboBox1.DataSource = mydataset.Tables("employee")
ComboBox1.DisplayMember = "name"
End Sub

错误很显然,我不懂vb,但是问题一定是出在
dataap.Fill(mydataset)

ComboBox1.DataSource = mydataset.Tables("employee")
这两个地方,你fill的时候没有指定表名,而你绑定的时候不是用的第0个表而是用表名表示的
讲dataap.Fill(mydataset),改为dataap.Fill(mydataset,"employee"),或者将ComboBox1.DataSource = mydataset.Tables("employee") 改为ComboBox1.DataSource = mydataset.Tables(0),思路是这样的但是我vb不熟,我想应该大致是对的,赫赫

16,717

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧