Office中国论坛/Access中国论坛

标题: 请帮忙改改 [打印本页]

作者: jhzlzc29 时间: 2003-5-29 02:27
标题: 请帮忙改改
请问能不能写成这样的格式：
　　非典时期请大家注意安全！
　　　　　　　　　　　发布人：XXXX
　　　　　　　　　　　日期：2003-5-28
另外，请问怎样才能使鼠标一移到这个标签就停止呢？
[attach]586[/attach]

作者: binuochao 时间: 2003-5-29 07:24
[attach]589[/attach]
第一个问题可以了！

作者: binuochao 时间: 2003-5-29 08:35
[attach]590[/attach]

不知第二个问题是不是这样的

作者: jhzlzc29 时间: 2003-5-29 19:21
谢谢了，不过你第二个中引用的控件我这里没有可不上传一个

作者: jhzlzc29 时间: 2003-5-29 20:11
还有一个问题，怎样才能实时更新数据呢？

作者: jhzlzc29 时间: 2003-5-29 20:12
就是显示的内容

作者: binuochao 时间: 2003-5-29 21:03
1，调用的是windows的API，在模块中有引用部分：
2，要数据实时更新，先定一个全局变量，在加载事件中置值，并在time事件内比较即可

Option Explicit
'宣告API
Private Declare Function ClientToScreen Lib "user32" (ByVal hwnd As Long, lpPoint As POINTAPI) As Long
Public Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long
'结构声明
Public Type POINTAPI
X As Long
Y As Long
End Type

[attach]595[/attach]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)