UC知道vb中怎样计算ado的列值把它加入combo中？
来源：百度知道 编辑：UC知道 时间：2024/06/04 11:56:07
Private Sub Command1_Click()
Adodc1.RecordSource = "select 班号 from 班级信息"
Adodc1.Refresh
Combo1.AddItem Adodc1.Recordset.Fields("班号")
End Sub
Adodc1.RecordSource = "select 班号 from 班级信息"
Adodc1.Refresh
Do While 用什么啊？
Combo1.AddItem Adodc1.Recordset.Fields("班号")
Adodc1.Recordset.MoveNext
Loop
你qq多少啊？
加分啊！！
Adodc1.RecordSource = "select 班号 from 班级信息"
Adodc1.Refresh
Combo1.AddItem Adodc1.Recordset.Fields("班号")
End Sub
Adodc1.RecordSource = "select 班号 from 班级信息"
Adodc1.Refresh
Do While 用什么啊？
Combo1.AddItem Adodc1.Recordset.Fields("班号")
Adodc1.Recordset.MoveNext
Loop
你qq多少啊？
加分啊！！
for循环或者do while数据集列
然后 combo1.AddItem
之前我写过一下 不过觉得麻烦 直接添加就算了
'ReDim comboData(rctDataList.RecordCount)
'For i = 1 To rctDataList.RecordCount
'Combo1.AddItem rctDataList.Fields("DataDescribe")
'comboData(i - 1) = rctDataList.Fields("CallName")
'rctDataList.MoveNext
'Next
抱歉 你加分我也没办法回答 因为比较少应用~~~~