VB 高手们进来下,小弟有个问题要请教各位!!!

来源:百度知道 编辑:UC知道 时间:2024/05/21 16:01:32
用VB怎么做个气泡提示的窗口呢???
注意:
1.窗口运行时在屏幕右下角
2.慢慢上升,过一分钟后又慢慢下降
3.如果单击窗体上的"我已知道!"按钮,窗口立即关闭
4.窗口是运行在MDI窗体中的,它是一个子窗体

谢谢各位啊!!!

可以用二个TIMER控件来控制,
TIMER1控制气泡的上升与下降,TIMER2控制一分钟的间隔。

设置二个FLAG
FLAG1来判断气泡是上升还是下降,为false则上升,为TRUE则下降
FLAG2来判断是否有鼠标移动到窗体了,FALSE 是没有鼠标移入,为TRUE则有鼠标移入。

窗体加载时,将TIMER1设置为可用,TIMER2设置为不可用,
TIMER1的INTERVAL 设置为100
TIMER2的INTERVAL 设置为60000

当气泡上升到预定位置后,将FLAG1设置为TRUE,TIMER1设置为不可用,启用TIMER2。

当窗体有鼠标移入后,将FLAG2设置为TRUE。

当TIMER2到时间启用TIMER事件时,判断FLAG2的值。
如果为FALSE 则启动TIMER1,关闭TIMER2。
如果为TRUE 不启动TIMER1,直接关闭TIMER2。

十分太少
你先去网上搜Vb 气泡提示弄懂了就好了,要用到api,不懂的话把代码发给你你也不知道怎么该。

可以初始化设置窗口的位置,然后通过循环来让Form.top不停+1

学习!