VB ADO控件
版权声明:原创作品,允许转载,转载时请务必以超链接形式标明文章 原始出处 、作者信息和本声明。否则将追究法律责任。http://wangwenlong.blog.51cto.com/372835/76428 |
ado控件
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\info.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select distinct 地点 from jiankao" Adodc1.Refresh Do While Not Adodc1.Recordset.EOF Combo1.AddItem Adodc1.Recordset.Fields.Item(0).Value Adodc1.Recordset.MoveNext Loop 'item根据名称或序号返回集合的特定成员。 'fields包含 Recordset 对象的所有 Field 对象的集合。 本文出自 “计算机编程开发” 博客,请务必保留此出处http://wangwenlong.blog.51cto.com/372835/76428 本文出自 51CTO.COM技术博客 |


2WDragon
博客统计信息
热门文章
最新评论
友情链接