Access VBA 手册.xlsVIP

手册 如何调用主菜单上的“压缩和修复数据库”命令？ 如何调用主菜单上的“压缩和修复数据库”命令？ 作者：未详 摘自：未详 编辑：cg1 更新日期：2003-3-29 浏览人次：73 专题地址： /index.asp?board=4recordid=73FAB21E17DC 简述： 源自 AccessXP 帮助: CompactRepair 方法 请参阅 应用于 示例 特性 压缩和修复指定的数据库 (.mdb) 或 Microsoft Access 项目 (.adp) 文件。返回 Boolean 型值；如果处理成功，返回 True。 expression.CompactRepair(SourceFile, DestinationFile, LogFile) expression 必需。返回“Applies To”列表中的一个对象的表达式。 SourceFile String 型，必需。代表要压缩和修复的数据库或项目文件的完整路径和文件名。 DestinationFile String 型，必需。完整的路径和文件名，代表所返回文件的保存位置。 LogFile Boolean 型，可选。如果在目标目录中创建一个日志文件用于记录在源文件中检测到的损坏，则为 True。只有在源文件中检测到损坏时，才创建日志文件。如果 LogFile 为 False 或省略，就不创建日志文件，即使在源文件中检测到损坏也是如此。 说明 源文件不可以是当前数据库，也不能被其他用户打开，因为调用该方法将会以独占方式打开源文件。 示例 下面的示例将压缩和修复一个数据库，如果在源文件中检测到损坏，则会创建一个日志文件，并根据恢复是否成功而返回一个 Boolean 值。为使该示例运行，必须将源文件和目标文件的路径和文件名传给它。 Function RepairDatabase(strSource As String, _ strDestination As String) As Boolean Input values: the paths and file names of the source and destination files. Trap for errors. On Error GoTo error_handler Compact and repair the database. Use the return value of the CompactRepair method to determine if the file was successfully compacted. RepairDatabase = _ Application.CompactRepair( _ LogFile:=True, _ SourceFile:=strSource, _ DestinationFile:=strDestination) Reset the error trap and exit the function. On Error GoTo 0 Exit Function Return False if an error occurs. error_handler: RepairDatabase = False End Function 在accessXP下如何隐藏菜单及右上角的帮助输入框 在accessXP下如何隐藏菜单及右上角的帮助输入框？ 显示或隐藏“提出问题”框 在“工具”菜单上，单击“自定义”。 单击“选项”选项卡。 在菜单栏上，右键单击“提出问题”框 。 选中或取消选中“显示提问框”以显示或隐藏该框。 注意 如果隐藏了“提出问题”框，只有等到关闭了“自定义”对话框后，才会关闭该框。 如何编程自定义菜单工具栏 如何编程控制菜单：工具-启动项 作者：cg1 摘自： 编辑：cg1 更新日期：2003-7-15 浏览人次：225 专题地址： /index.asp?board=4recordid=77FAB41E14DC 简述： 如何编程控制菜单“工具”-“启动项”中得选项？ 比如： [显示数据库窗口] [显示状态栏] [允许默认快捷菜单] [允许全部菜单] [允许内置工具栏] [允许更改工具栏菜单栏] [使用ACCESS特殊键] 问题： 问题是这样的：在ACCESS的工具-启动项，它有几个多选框： [显示数据库窗口] [显示状态栏] [允许默认快捷菜单] [允许全部菜单]