Access 2003完整教程:关于使用 Visual Basic 代码处理数据和数据库对象

除了使用 Microsoft Access 界面中的数据和对象(如窗体和报表)以外,还可以使用Microsoft Visual Basic编写过程,来动态地创建、删除和修改数据和对象。例如,可以编写一个过程,当用户执行特定的操作时,在窗体上放置标题或改变窗体字段的颜色。

在代码中可以直接引用数据和对象,也可以通过声明对象变量来表示数据和对象。在声明和指定对象变量后,就可以使用该对象,就像使用该变量代表的对象的名称一样,并且可以像更改所有变量值一样更改该对象变量的值。

注释在运行下面的示例前,要确保已在Microsoft“Visual Basic 编辑器”中设置对“Microsoft ADO Ext. 2.1 for DDL and Security”(或更高版本)的引用。

操作方法:

  1. 打开“模块”窗口。
  2. 在“工具”菜单上,单击“引用”。
  3. 在“可使用的引用”框中,选择“Microsoft ADO Ext. 2.1 for DDL and Security”(或更高版本),然后单击“确定”。

下面的Sub程序创建了一个“Old Invoices”表,该表只有一个“OrderID”字段。它演示了如何对对象进行声明,如何指定值,以及如何在代码中引用这些对象:

Public Sub ADOXCreateTable()
' The ADOX Catalog object corresponds to the DAO Database
' object
Dim cat As ADOX.Catalog
Dim tbl As ADOX.Table
   ' Open the catalog
   cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
      "Data Source=<full path to your database>\<your database name>.mdb;"
   ' Create a new Table object.
   With tbl
      .Name = "Old Invoices"
      ' Create a field and append it to the new Table
      ' object. This must be done before appending the
      ' Table object to the Tables collection of the
      ' Catalog.
      .Columns.Append "OrderID", adVarWChar
   End With
   ' Add the new table to the database.
   cat.Tables.Append tbl
'Clean up the references
   Set cat = Nothing
   Set tbl = Nothing
End Sub

MicrosoftActiveX 数据对象 (ADO)提供如表、查询、关系和索引等对象,完成Microsoft Access 数据库中的数据管理任务。这些对象被称作数据访问对象。可以与其他使用 Microsoft ADO 的应用程序(例如 Microsoft Excel)共享使用数据访问对象的 Visual Basic 代码。

也可通过任一OLE DB 提供程序使用“Jet 和同步复制对象”(JRO)访问及处理数据库服务器中的数据。

除此以外,Microsoft Access 还定义了各种用来处理数据的对象,如窗体、报表和控件。

上页:Access 2003完整教程:关于在查询中处理空字段 (MDB) 下页:Access 2003完整教程:关于对记录进行排序 (MDB)

Access 2003完整教程:关于使用 Visual Basic 代码处理数据和数据库对象

Access 2003完整教程:关于对记录进行排序 (MDB)Access 2003完整教程:打开报表快照
Access 2003完整教程:添加图片或对象Access 2003完整教程:显示或隐藏节
Access 2003完整教程:调整图片大小Access 2003完整教程:总计查询中的记录 (MDB)
Access 2003完整教程:在查询中更改字段名 (MDB)Access 2003完整教程:创建、自定义和删除切换面板窗体 (MDB)
Access 2003完整教程:重命名表或数据表中的字段 (MDB)Access 2003完整教程:在控件上应用或更改条件格式
Access 2003完整教程:转换 Access 文件Access 2003完整教程:复制或移动数据
Access 2003完整教程:创建 Access 项目Access 2003完整教程:在窗体或报表中添加图表
Access 2003完整教程:创建复选框、切换按钮或选项按钮Access 2003完整教程:创建或修改命令按钮
Access 2003完整教程:创建弹出式窗体或报表Access 2003完整教程:创建数据访问页
Access 2003完整教程:创建筛选 (ADP) Access 2003完整教程:创建窗体
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号