请教access的vba中的几个问题？

bigbig

有几个问题要麻烦各位大虾了
access的vba中
1)要实现鼠标移动到label时，label变色，离开时恢复。
有onMouseMove事件可以实现鼠标移动，但离开时怎么办
2)为什么tab框中的控件不能动态设置显示属性
3)acces中如何重命名 一个外部文件
先谢谢了！

土豆

VB中没有MOUSEOUT事件，可以捕捉窗体的MOUSEMOVE事件

通过API可以使用系统钩子创建自己的MOUSEOUT事件，但是如果你对API不熟悉不建议使用，容易引起系统崩溃

问题2没有测试过，可以把你自己的例子传上来我看一下

问题3：你是问重命名任意的外部文件还是把当前数据库重命名为另外一个文件？
对于前者，可以使用VBA的NAME语句（建议学会使用系统帮助），参考如下

Name 语句
      

重新命名一个文件、目录、或文件夹。

语法

Name oldpathname As newpathname

Name 语句的语法具有以下几个部分：

部分 描述
oldpathname 必要参数。字符串表达式，指定已存在的文件名和位置，可以包含目录或文件夹、以及驱动器。
newpathname 必要参数。字符串表达式，指定新的文件名和位置，可以包含目录或文件夹、以及驱动器。而由 newpathname 所指定的文件名不能存在。



说明

Name 语句重新命名文件并将其移动到一个不同的目录或文件夹中。如有必要，Name 可跨驱动器移动文件。 但当 newpathname 和 oldpathname 都在相同的驱动器中时，只能重新命名已经存在的目录或文件夹。 Name 不能创建新文件、目录或文件夹。

在一个已打开的文件上使用 Name，将会产生错误。必须在改变名称之前，先关闭打开的文件。Name 参数不能包括多字符 (*) 和单字符 (?) 的统配符。

bigbig

真快，真是太谢谢了！

bigbig

关于2,麻烦请看一下

[此贴子已经被作者于2004-3-22 19:39:07编辑过]

土豆

不知道你的文件是什么版本的，我这里打开不太正常。

我推测有可能是因为你设置了TAB页的焦点，这时该页的第一个控件自动得到焦点。
所以设置控件的VISIBLE属性为FALSE时要先把该控件的焦点移走

bigbig

我这用access2000.
正如你说的,设置了TAB页的焦点,但是tab页中，只有一个button，请问能有代码控控制移走焦点吗?

土豆

调用其他控件的setfocus，就相当于把当前控件的焦点移走

bigbig

不错的办法，非常感谢！

yrg

问题1在微软的网站上有有示例

bigbig

谢谢，研究研究