在Access中使用系统表保存应用程序变量

2016-02-19 15:47 3 1 收藏

图老师小编精心整理的在Access中使用系统表保存应用程序变量希望大家喜欢，觉得好的亲们记得收藏起来哦！您的支持就是小编更新的动力~

【 tulaoshi.com - 编程语言】

　　在开发ACCESS应用程序时，一般需要在窗体和模块中引用许多变量。为管理这些变量，当然可以在启动窗体中使用Microsoft Visual Basic for Application（VBA）来设置它们的值，然后再调用某个模块，由该模块初始化这些值。

　　然而，在完成应用程序开发之后，使用这个方法的问题出现了：其他人可能需要在将来某个时候改变那些值，却不知道从何处开始。我建议在数据库中建立一个名为SystemTbl的表，然后用户可以访问这个表，并在恰当的时候修改数据。

　　建立表和窗体

　　将表创建好并将变量添加到表中的新记录之后，可以为用户创建一个只允许修改而不能添加或删除记录的窗体，表中应该只包含一条记录保存有关使用方法的信息。一旦保存完所有变量，可以在应用程序需要的时候使用VBA来检索那些变量值。

　　例如，假设应用程序需要保存应用程序管理员的姓名和电话号码，正如你刚才所了解到的，这条信息要求容易修改，如果把它编写到窗体或模块的代码中没有什么意义。

　　该表预定义了一条记录和两个字段（到目前为止）：

　　● 表：SystemTbl

　　● 字段1：AdminName

　　● 字段2：AdminPhone

　　当需要在窗体上向用户显示恰当的姓名和电话号码时，可以使用OnOpen或OnLoad事件填充窗体上的相应标签，在本例中，我们把标签命名为“PhoneLabel”和“NameLabel”。清单1.10 .A显示了这个示例函数的代码。

　　在该示例函数中，我们以SnapShot-ForwardOnly方式打开记录集，以减少访问记录集时占用的资源；然后，我们将表中字段的值应用到Name和Phone标签的标题上。

　　最后，关闭记录集。永远记住要关闭记录集，它会累积为不需要的资源，导致性能降低甚至更糟糕的问题。由于系统表中只有一条记录，检索过程极快。现在，你已经给一个有效的数据库应用程序添加了可扩展的解决办法

来源:https://www.tulaoshi.com/n/20160219/1610430.html

上一篇： FORM程序中Oracle与Access表的导入和导出
下一篇： Windows防范非法入侵有奇招

看过《在Access中使用系统表保存应用程序变量》的人还看了以下文章更多>>

使用VBA创建应用程序

标签： autocad教程

实例1 最简单的VBA程序—“Hello.dvb” Step 1 创建新文件运行Auto CAD 2002系统，以“acadiso.dwt”为样板创建图形文件，并调用“vbaide”命令进入VBA环境； Step 2 创建窗体 (1) 选择菜单【Insert（插...

在VB应用程序中恰当的使用声音

标签：编程语言网络编程

众所周知，VisualBasic是功能非常强大的多媒体开发工具，它有丰富的函数和方法处理各种各样的多媒体信息，能够很灵活的操作图形、声音、动画、影象等多媒体素材。但有时我们使用VisualBasic开发非多媒体应用程序，并不需要在应用程序中大量的使用声音，而只是需要在特定的场合出现。如Windows的警告声。这就要求程序员在恰当的环境中恰当的使用...

在Visual C#程序中使用系统热键

标签：编程语言网络编程

1.首先引入System.Runtime.InteropServices using System.Runtime.InteropServices; 2.在类内部声明两个API函数,它们的位置和类的成员变量等同. [System.Runtime.InteropServices.DllImport("user32.dll")] //申明API函数 public static extern bool RegisterHotKey( IntPtr hWnd, // handle to wind...

Something Not Entirely Unlike Access应用程序介绍

标签：编程语言网络编程

“我们希望你在MS Access中建立一个应用程序，但是我们不希望它看起来像Access。事实上，我们希望它看起来像一个web页面。。。像一个浏览器应用程序。” 这可行吗？你自己判断。下面是一个截屏，你可以在这里下载这个应用程序的代码，我称之为Something Not Entirely Unlike Access。这个应用程序描述了下面与浏览器类似的功能： ...

在access中使用DataGrid必须注意

标签：编程语言网络编程

问题：在access窗体里面可以用datagrid控件吗？ Dim rs As New ADODB.Recordset rs.Open "select * from 表1", CurrentProject.Connection, 1, 1 Set dg1.DataSource = rs 'dg1 就是一个datagrid，我这样设置对吗？怎么没有任何反应阿？我的环境不是vb，是vba的Access环境，谁能帮忙？回答：要在rs.open前加上 Rs.CursorL...

查看更多精彩>>