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

在开发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标签的标题上。

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

时间: 2024-10-06 15:04:50

在Access中使用系统表保存应用程序变量的相关文章

SQL Server 2005中各个系统表的作用

SQL Server 2005中有很多自带的系统表,这些表都有各自的作用,下面的表格则分别描述了这些系统表的所属及其作用,仅供参考. sysaltfiles 主数据库 保存数据库的文件 syscharsets 主数据库 字符集与排序顺序 sysconfigures 主数据库 配置选项 syscurconfigs 主数据库 当前配置选项 sysdatabases 主数据库 服务器中的数据库 syslanguages 主数据库 语言 syslogins 主数据库 登陆帐号信息 sysoledbuse

Access中以文字方式保存文件名的图片如何在报表中预览?

access|文件名 以文字方式保存文件名的图片如何在报表中预览?   问题: 报表中如何预览图片? 数据库表中存放着下面几个字段,学号,姓名,性别,图片路径,如下:1002003001,张三,男,100\2003\1002003001.jpg.现在做报表,想把图片显示出来,因为图片路径为字符类型,所以显示出来的是100\2003\1002003001.jpg,怎样做能把图片显示出来?图片就在数据库所在目录下的100\2003\的文件夹下.   回答: 在报表中放置不可见的TEXTBOX,显示图

如何在Access中创建数据表

  1.打开你的access,然后在菜单栏上点击 创建 选项. 2.在创建选项中,点击表设计. 3.这样就来到了表设计器.我们在左边的这个字段名称这一栏输入字段的名称,在数据类型这一栏点击下列按钮,在下拉菜单中,选择 数字. 计算"> 4.同样的方法我们建立"姓名字段",并设置其数据类型为 文本. 5.等所有的字段都添加完毕以后,我们点击左上角的视图按钮. 6.在下拉菜单中,找到数据表视图,单击它. 7.弹出是否保存表的提示,我们点击是. 8.要求输入该数据表的名称,笔

MFC SDI 中 通过注册表保存当前窗体的 显示状态位置

    在 框架类响应 WM_CLOSE消息的时候添加如下代码    HKEY  key;        //用于接收注册表项句柄  WINDOWPLACEMENT  info;  //获得窗体位置状态信息  GetWindowPlacement(&info);  //CWnd类的函数获取一个窗体的状态信息  if(ERROR_SUCCESS==                          //调用  RegOpenKeyEx 打开注册表 返回key  如果成功 返回  ERROR_SUC

SQL Server 中各个系统表的作用

server sysaltfiles    主数据库               保存数据库的文件syscharsets    主数据库               字符集与排序顺序sysconfigures  主数据库               配置选项syscurconfigs  主数据库               当前配置选项sysdatabases   主数据库               服务器中的数据库syslanguages   主数据库               语言sys

SQL Server中各个系统表的作用

server sysaltfiles    主数据库               保存数据库的文件 syscharsets    主数据库               字符集与排序顺序 sysconfigures  主数据库               配置选项 syscurconfigs  主数据库               当前配置选项 sysdatabases   主数据库               服务器中的数据库 syslanguages   主数据库               

Oracle中常用系统表

dba_开头..... dba_users 数据库用户信息 dba_segments 表段信息 dba_extents 数据区信息 dba_objects 数据库对象信息 dba_tablespaces 数据库表空间信息 dba_data_files 数据文件设置信息 dba_temp_files 临时数据文件信息 dba_rollback_segs 回滚段信息 dba_ts_quotas 用户表空间配额信息 dba_free_space数据库空闲空间信息 dba_profiles 数据库用户资

Windows8中打开系统自带录音机程序的操作办法

  方法一:在正常桌面中,按键盘的 F3 按键,键入"录音机"并回车搜索,然后点击选择"录音机". 方法二:使用组合热键"Win+R"调出运行对话框,输入"soundrecorder",确定后打开"录音机"程序. 方法三:在 Metro 界面,然后单击鼠标右键,点击屏幕下方出现的"所有程序",在"所有程序"界面,找到 Windows 附件里的"录音机&quo

Win10中卸载系统预装的应用程序?

要卸载这些所有内置应用,就要用到Windows PowerShell,它是Win10系统自带的一个应用,要打开它,就单击开始菜单中的"所有应用",然后找到Windows Power Shell的文件夹,右键单击Windows PowerShell(注意不是Windows PowerShell ISE),然后单击以管理员身份运行,就打开了.       打开了Windows PowerShell,就开始输入命令了     要卸载OneNote,在里面输入   Get-AppxPackag