vb实现数据的查询数据库，vb连接sql数据库简单实例
很多朋友对于vb实现数据的查询数据库和vb连接sql数据库简单实例不太懂，今天就由小编来为大家分享，希望可以帮助到大家，下面一起来看看吧！
vb编写学生基本信息实现access数据库的增删改查
1）首先需要用Office软件中的Access软件建立一个学生基本信息数据库。表中新建几个表，可以是学生名册表，学生各专业课程分数登录表等等。
2）VB新建数据工程，此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件。
3）然后在FORM1窗体中添加ADO数据控件，右键-ADODC1控件属性页-使用连接字符串，选生成，在提供者选项中选MICROSOFT jet 4.0 OLE DB Provider,然后按要求连接数据库等。在ADODC1控件属性页使用连接字符串空白文本窗口中就有一长串字符串，注意该字符串可复制到程序代码用于编程。
ADODC1控件属性页的数据源内有命令文本（SQL）编写窗口可编写SQL查询语言。该窗口的SQL语句可复制到程序代码用于编程。
4）可以将SQL查询语句赋值给ADO数据控件的RecordSource属性来达到添加、删除、修改或查询。
5）数据的输入、修改等可灵活应用文本框或数据表格控件与ADO数据控件通过代码绑定。
6）想使用ADO数据对象，也可将ADO数据控件所写的代码较方便的移植给ADO数据对象。
典型的ADO数据控件的数据连接和查询代码：
PrivateSubCommand4_Click()
Adodc1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=D:\ProgramFiles\MicrosoftVisualStudio\VB98\BIBLIO.MDB;PersistSecurityInfo=False"
Adodc1.RecordSource="select*fromAuthorswhereAuthor='Jacobs_Russell'"
Adodc1.Refresh
SetDataGrid1.DataSource=Adodc1
EndSub典型的数据对象代码：
PrivateSubCommand11_Click()
DimcnAsNewADODB.Connection'定义数据库的连接
DimrsAsNewADODB.Recordset
DimsqlAsString
sql="select*fromguzhang_sj"'wheremadanhao='1'"
cn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&App.Path&"\wd.mdb;PersistSecurityInfo=False"
cn.Open
rs.CursorLocation=adUseClient
rs.Opensql,cn,adOpenDynamic,adLockOptimistic
SetMSHFlexGrid1.DataSource=rs
rs.AddNew
rs.Fields(0).Value="14"
rs.Update
EndSub
VB怎么调用数据库数据
VB可将Sql结构化查询语句赋值Ado(ActiveX数据对象)或ADO Data控件，访问和操作数据库。
ADO(ActiveX数据对象)，这项新的数据访问技术的特性包括：更简单的对象模型；与其它 Microsoft和非 Microsoft的技术更好的集成；为本地和远程数据数据提供的通用接口；可远程访问的和断开的记录集；用户可访问的数据绑定接口；以及层次结构的记录集。
ADO Data控件，这是一种新的、OLEDB识别的数据源控件，其功能与内部的 Data控件和 Remote Data控件十分相似，通过这种方式允许用户用最少的代码来创建数据库应用程序。
Visual Basic 6.0中，已经可以将任何 ADO/OLE DB数据源绑定到任何 ADO/OLE DB数据使用者上。在运行时，可以设置控件的 DataSource属性来将控件动态地绑定到数据源。可以创建用作数据源和数据使用者的类，并且通过新的 BindingsCollection对象将这些类绑定在一起。可以创建与 ADO数据控件相似的、用作数据源的用户控件。还可以创建与 DataGrid控件相似的、复杂绑定的用户控件。
以下是经ADO(ActiveX数据对象)访问Access数据库的实例代码：
DimcnnAsNewConnection
DimrsAsNewRecordset
DimsqlAsString
DimARR
cnn.Open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource=C:\wdOld.mdb;PersistSecurityInfo=False"
sql="select故障名称fromguzhang_bm"
rs.Opensql,cnn
Combo1.Text="故障名称"
DoWhileNotrs.EOF
Combo1.AddItemrs("故障名称")
rs.MoveNext'打开表
Loop
rs.Close
cnn.Close以下是使用ADO Data控件访问Access数据库德实例代码：
Adodc1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&App.Path&"\wd.mdb;PersistSecurityInfo=False"
Adodc1.RecordSource="select*fromjishijilu"'whereshijianlike'%8112%'Andgyh_riqilike'%10%'"
Adodc1.Refresh
SetMSHFlexGrid1.DataSource=Adodc1
MSHFlexGrid1.Row=1
MSHFlexGrid1.ColSel=MSHFlexGrid1.Cols-1
如何用VB建立数据库
1、首先点击打开主菜单栏中的“外接程序”选项。
2、然后在弹出来的窗口中点击打开“可视化数据管理器”，出现下图中的界面。
3、然后单击文件中的新建，选择“microsot access”，“version 7.0”，弹出保存界面，点击保存后出现如下界面。
4、然后右键单击properties，选择“新建表”，输入表名称，添加字段。
5、然后打开类型，选择字段类型的大小，回车确定。
6、然后点击“生成表”选项。
7、然后双击“1”或者右键单击选择打开。
8、然后输入值后工具栏会变化。
9、然后点击添加就完成了。
如果你还想了解更多这方面的信息，记得收藏关注本站。