[如何用VB代码创建mdb数据库]Private Sub Command1_Click() CreateDatabase ＂c:\1.mdb＂ End Sub Public Sub CreateDatabase(ByVal sDatabaseFile As String) Dim cat Set cat = CreateObject(＂ADOX.Catalo...+阅读
在此本人使用ADO对象访问ACCESS数据库，但ADO对象在使用前你先要进行添加，启动VB6后，单击菜单“工程-引用”，打开引用对话框，选择“Microsoft ActiveX Data Objects 2.0 Library”，将其勾选，（以2.0版本为例，实际可以选择系统中的最高版本如本人的就是2.6版本），然后在当前目录下建立一个名为“学生”的ACCESS数据库，其中表名为“表”，字段共有：学号，姓名，年龄，性别四个字段，接下来就是设计界面了（自己设计）
现在介绍如何使用代码访问ACCESS数据库：
在代码窗口中编写一个返回字符型的函数
Function Connection() As String
'数据库的连接设置配置
Connection = ＂Provider=Microsoft.Jet.OLEDB.4.0;Data Source=＂ & App.Path + ＂\学生.mdb＂
End Function
该函数用于连接数据库用
Private Form_Load()
Dim cnn As New ADODB.Connection
Dim Rst As New ADODB.Recordset
cnn.Open Connection
Set Rst = New ADODB.Recordset
Rst.Open ＂select * from 表＂， cnn, adOpenKeyset, adLockOptimistic
End Sub
注：
Dim cnn As New ADODB.Connection创建一个ADO数据库连接对象
Dim Rst As New ADODB.Recordset为创建一个ADO数据库记录对象
select * from 表 是SQL查询语言，这里为数据源，意思就是打开数据库“学生”中的表“表”
下面是将数据库表中的字段值显示出来的一个过程
Sub View()
Dim i As Integer
For i = 0 To 2
Text1(i) = Rst.Fields(i)'text1为控件数组
Next
If (Rst.Fields(3) = True) Then
Text1(3) = ＂男＂
Else
Text1(3) = ＂女＂
End If
End Sub
要访问ACCESS数据库就这样可以实现，访问SQL也差不多，稍有不同，回答完毕，如还有问题请继续和我联系，本人是专使用VB+SQL/Delphi+SQL开发数据库管理系统的程序员。
别忘了采纳我的回答，谢谢！
以下为关联文档：
求在AIX5 3下将正式环境中的Oracle10g数据库利用copy文件的办法迁最好不要用copy(copy的方法经常导致数据库起不来)，使用tar命令。 步骤1：在源主机A上将数据库停掉。 步骤2:tar -cvf oracle.tar /oracle目录 步骤3：在目标主机B上建立相同的文...
oracle数据库的操作步骤e数据库服务器就足够了，这时你已经拥有oracle客户端的功能。 （1）你可以通过第三方软件：如 PLSQL Developer（非常强大的Oracle数据库操作软件）来操作Oracle数据库； （2）当然装完Oracle...
office2007的Excel表如何转换成DBF数据库office2007的Excel转换成DBF步骤： 1、打开要转格式的Excel电子表格文件，点击文件菜单。 2、点击 另存为。 3、保存类型选择DBF （这里有DBF 2、3、4 选 DBF4就行）。 4、提示不...
2007 excel怎么在图表下显示数据库2007 excel在图表下显示数据库 只是数据内容改变，图表中的系列也会跟着改变，因为他们之间是绑定的。 在图表中重新指定了数据源位置，原先的系列所链接的数据源就会断开绑定，与图...
Oracle数据库该如何学习学习好ORACLE，首先要学习ORACLE体系结构。 1、如果有一定的数据库基础，知道SQL是怎么回事，即使写不出来简单的SQL，但可以看动它们，你就可以跳到2。否则请先看一下数据库基础和SQL...
如何在HTML中利用js调用php的内容PHP教程printf （＂打开文件 %s 失败！＂，$countfile）;exit;}else{//如果文件能够正常打开，就读入文件中的数据，假设是1 $count = fread ($fp,10); //读取10位数据 $count = $count + 1; fclose...
国外有哪些寄生虫数据库a. OSI公司的PI( Plant Information System ) b. Aspen公司的IP21( InfoPlus.21 ) c. Honeywell公司的PHD( Process History Database ) d. Instep公司的eDNA(enterprise Di...
PHP如何把数据库导出EXCEL表格< ?php function getmicrotime(){ list($usec, $sec) = explode(” “,microtime()); return ((float)$usec + (float)$sec); } ?> < ?php $time_start = getmicrotime(); i...
将Excel导入到SQL数据库初学一条语句就可以 insert into bookinfo SELECT * FROM OPENROWSET( 'Microsoft.Jet.OLEDB.4.0', 'EXCEL 5.0;HDR=YES;IMEX=2;DATABASE=E:\mydev\sql\对账.xls' ,'SELECT * FR...
