VB ListBox控件没有RowSource和ListField属性
PrivateSubForm_Load()'连接数据库Setconn=NewADODB.Connectionconn.Open"Provider=Microsoft.Je...
Private Sub Form_Load()
'连接数据库
Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=C:\Users\a\Documents\数据库\家庭财务\JTCW.mdb;" & "Persist Security Info=False"
'打开记录集
Dim strSQL As String
strSQL = "SELECT 姓名 from 家庭成员 ORDER BY 姓名"
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open strSQL, conn, adOpenKeyset, adLockOptimistic
Set txtName.DataSource = rs
txtName.DataField = "姓名"
Set DataList1.RowSource = rs
DataList1.ListField = "姓名"
End Sub
运行时没有未找到方法和数据成员 展开
'连接数据库
Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=C:\Users\a\Documents\数据库\家庭财务\JTCW.mdb;" & "Persist Security Info=False"
'打开记录集
Dim strSQL As String
strSQL = "SELECT 姓名 from 家庭成员 ORDER BY 姓名"
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open strSQL, conn, adOpenKeyset, adLockOptimistic
Set txtName.DataSource = rs
txtName.DataField = "姓名"
Set DataList1.RowSource = rs
DataList1.ListField = "姓名"
End Sub
运行时没有未找到方法和数据成员 展开
2个回答
展开全部
……RowSource和ListField属性要Datalist和DataCombo这样的ActiveX控件才有，并不是VB自带的LISTBOX控件对应的属性，必须在“部件”选项卡中选择"Microsoft Datalist Control 6.0(OLEDB)加载以后才可以使用。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
TableDI
2024-07-18 广告
在上海悉息信息科技有限公司，我们深知Excel在数据处理中的重要作用。在Excel中引用不同工作表（sheet）的数据是常见的操作，这有助于整合和分析跨多个工作表的信息。通过在工作表名称前加上感叹号“!”，您可以轻松地引用其他工作表中的数据...
点击进入详情页
本回答由TableDI提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
