With Combo1
Do While Not FrmPower.Adodc2.Recordset.EOF
.AddItem FrmPower.Adodc2.Recordset.Fields(0)
FrmPower.Adodc2.Recordset.MoveNext
Loop
.ListIndex = 0本来是这句 但我需要指定初始显示为我下面指定内容但下面的语句执行显示--------------类型不匹配-------------
.ListIndex = FrmPower.Adodc1.Recordset.Fields(2)
End With
Do While Not FrmPower.Adodc2.Recordset.EOF
.AddItem FrmPower.Adodc2.Recordset.Fields(0)
FrmPower.Adodc2.Recordset.MoveNext
Loop
.ListIndex = 0本来是这句 但我需要指定初始显示为我下面指定内容但下面的语句执行显示--------------类型不匹配-------------
.ListIndex = FrmPower.Adodc1.Recordset.Fields(2)
End With
.List(.ListIndex)== FrmPower.Adodc1.Recordset.Fields(2)看看
ListIndex 属性为整数值,而字段的值可能不是整数,即使是
整数也不是你要得效果。