请教一个“未找到方法或数据成员”的错误问题

Question

Dim rs As New ADODB.Connection
Dim dbrs As New ADODB.Recordset
Dim strsql As String
    rs.Open "Provider=MSDAORA.1;Password=111;User ID=op;Data Source=sl;Persist Security Info=True"
    rs.CursorLocation = adUseClient
    
    strsql = "select vsll,vsll||':'||vsl_name as vsll_name from vess order by vsll"
    Set dbrs = rs.Execute(strsql)    Set cbOper.RowSource = dbrs      -------(错误标注在这里出现)
    cbOper.ListField = "vsl_name"
    cbOper.BoundColumn = "vsl"
    
    dbrs.Close: Set dbrs = Nothing请高手帮助解决一下！谢

Answer 1

cbOper 这是什么?cbOper.RowSource你确定有这个属性或方法吗?

Answer 2

cbOper 是一个 comboBox控件名称

Answer 3

ComboBox 控件没有 .RowSource 属性。
有一个： .DataSource 属性，不是是不是楼主想要的结果。