VB6.0中用DataGrid数据库查询
请大家你们好：我要“VB6.0中用DataGrid1数据库查询”代码打开“Excel数据”按钮，链接DataGrid1控件（不用Adodc1控件）显示数据，查询输入文本框...
请大家你们好：
我要“VB6.0中用DataGrid1数据库查询”代码
打开“Excel数据”按钮，链接DataGrid1控件（不用Adodc1控件）显示数据，查询输入文本框身份证号码，显示所有信息的代码。 展开
我要“VB6.0中用DataGrid1数据库查询”代码
打开“Excel数据”按钮，链接DataGrid1控件（不用Adodc1控件）显示数据，查询输入文本框身份证号码，显示所有信息的代码。 展开
1个回答
展开全部
我提供核心代码块，剩下的自己解决
Set cn = CreateObject("ADODB.Connection")
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & App.Path & _
"\data.xls;Extended Properties=Excel 8.0"
Set rs = CreateObject("ADODB.Recordset")
rs.CursorLocation = adUseClient
rs.Open "select * from [Sheet1$]", cn, 1, 1
Set datagrid1.DataSource = rs
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
