VB.net数据库编程(01):简单的入门实例--连接到Access文件

前端之家收集整理的这篇文章主要介绍了VB.net数据库编程(01):简单的入门实例--连接到Access文件前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
先来一个简单的实例。

VB.net 2012

sql server 2012

Access文件:http://download.csdn.net/detail/dzweather/5042992

(两个版本,2003,2012,任选一个)


根据前面ADO.net入门的介绍,我们知道了连接的过程。

AccessFile文件,针对的是Oledb,所以首先应引用。


然后 ,定义三个对象,在实例中再进行创建(这样可以节约点资源)


特别注意 的是,里面没有了cmd过程,我感觉这样的入门适合我学习。

这个例子,就一个窗体,一个datagridview(不绑定,用代码绑定),然后就是几句代码,很简单。


  1. ImportsSystem.Data.OleDb
  2. PublicClassForm1
  3. DimcnAsOleDbConnection
  4. DimdaAsOleDbDataAdapter
  5. DimdsAsDataSet
  6. PrivateSubForm1_Load(senderAsObject,eAsEventArgs)HandlesMyBase.Load
  7. DimcnStrAsString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=D:\persons.mdb;PersistSecurityInfo=False"
  8. cn=NewOleDbConnection(cnStr)
  9. DimsqlAsString="select*fromgrade"
  10. da=NewOleDbDataAdapter(sql,cn)
  11. ds=NewDataSet
  12. da.Fill(ds,"grade")
  13. DataGridView1.DataSource=ds.Tables(0)
  14. EndSub
  15. EndClass


==========================================================================================================


上面的有点简单,但流程清晰。与我们实际应用有很大距离。

下面再跨一步,接近实际应用,即变得较为灵活点:

?
    PrivateSubbtnQuery_Click(senderAsObject,eAsEventArgs)HandlesbtnQuery.Click
  1. DimsqlAsString=TextBox1.Text
  2. PrivateSubbtnQueyName_Click(senderAsObject,eAsEventArgs)HandlesbtnQueyName.Click
  3. DimsqlAsString="select*fromgradewhere姓名like"&"'%"&TextBox2.Text&"%'"
  4. EndClass

代码活没用try catch,反正只是入门。

结果如下:


这样就可以有两个查询方式,一是sql语句灵活用,二是姓名。




这样一个简单的查询就出来了。这只是一个“查询”,但我们有时还要修改删除等工作。


修改删除时,不但要执行sql,最终我们还要把结果反馈给用户看。于是就有了第个简单实例。


========================================================================================================




DataGrideView控件,很多选项都是边框、单元颜色、数据格式、选择方式。太多了。画个图加深印象:

猜你在找的VB相关文章