vb中combo控件如何绑定数据库显示各个字段名？而不是绑定某个字段。 5
PrivateSubForm1_Load()'初始化DimiAsIntegerAdodc1.RecordSourse="select*fromstudent"'连接“st...
Private Sub Form1_Load() '初始化
Dim i As Integer
Adodc1.RecordSourse = "select * from student" '连接“student”表
Adodc1.Refresh '刷新连接
Combo1.Clear '清空combo1
For i = 0 To Adodc1.Recordset.Fields.Count - 1
'将每个字段的名字作为一个项目，添加到combo1中
Combo1.AddItem Adodc1.Recordset.Fields(i).Name
Next i
Combo1.Text = Combo1.List(0)
cmdclear_click '清空文本框
End Sub
为什么combo中显示是空的，该怎么修改？
我是想先显示要选的列名，再选择字段的值。不过现在问题解决了，我在属性框里找到list属性，直接输入就可以了。 展开
Dim i As Integer
Adodc1.RecordSourse = "select * from student" '连接“student”表
Adodc1.Refresh '刷新连接
Combo1.Clear '清空combo1
For i = 0 To Adodc1.Recordset.Fields.Count - 1
'将每个字段的名字作为一个项目，添加到combo1中
Combo1.AddItem Adodc1.Recordset.Fields(i).Name
Next i
Combo1.Text = Combo1.List(0)
cmdclear_click '清空文本框
End Sub
为什么combo中显示是空的，该怎么修改？
我是想先显示要选的列名，再选择字段的值。不过现在问题解决了，我在属性框里找到list属性，直接输入就可以了。 展开
1个回答
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
