vb 6.0datacombo控件内容不显示

时间:2014-08-04 02:35:50
【文件属性】:

文件名称:vb 6.0datacombo控件内容不显示

文件大小:494B

文件格式:TXT

更新时间:2014-08-04 02:35:50

vb 6.0 datacombo控件 内容不显示

大虾们: 最近我用VB在做个小程序,就是用DataCombo1控件实现调用SQL数据库clientdocu表中的clienname字段。现在我单击DataCombo1控件后,下拉框中没有内容显示。 数据库连接是没有问题的,因为我用Print comp1(0).Value, comp1(1).Value是可以看到结果的。 源代码如下: Private Sub DataCombo1_Click(Area As Integer) login.DBconnect.Open compsqlstr = "select cliecode,cliename from clientdocu" comp1.Open compsqlstr, login.DBconnect, adOpenKeyset, adLockOptimistic Print comp1(0).Value, comp1(1).Value Set DataCombo1.DataSource = comp1 DataCombo1.DataField = cliename Set DataCombo1.RowSource = comp1 DataCombo1.ListField = cliename DataCombo1.BoundColumn = cliecode comp1.Close login.DBconnect.Close End Sub 还请大虾们看看,我哪地方出错呢。谢谢


网友评论

  • 下载过了,还可以吧