Question

vb中鼠标移到label时字体变大,移开鼠标时字体变回原来大小,然后再点击时才进入另一窗体怎么实现??

Answer 1

VB做这个有点麻烦，因为没有MOUSEENTER，MOUSELEAVE事件。一种模拟的办法，LABEL_MOUSEMOVE里面判断鼠标进入，窗体MOUSEMOVE判断鼠标移出（假设LABEL直接放在窗体上）

Answer 2

要精确的判断鼠标进出控件，需要借助API函数SETCURSOR（好像是这个，好久以前写过类似的代码）

Answer 3

这是做游戏菜单吗？mousemove即可

追答

那移开鼠标时怎么恢复原来的字体

mousemove是全窗口判定，可以用一个不可见的控件覆盖全窗口来检测 然后判断鼠标坐标

那要编写很多代码咯。唉。

没办法 VB6没有相应函数很蛋疼……

别的都不会。界面设计太难了

如果要求的按钮的移入和移出 我倒是可以实现。。。汗

可惜按钮不透明啊。。。

如果不是透明度叠加可以用image控件代替按钮，不然就得用gdi了

image不错。可以在窗体上建立一个按钮。然后image单击时调用按钮就好了

要啥按钮啊 直接image1_click()

那回车键呢？

if keycode = vbkeyenter（可能有误）

大神那以后岂不是不用按钮了？

你要是做小程序可以偷懒省个按钮美化工作 不过做大一点的程序尤其是游戏最好还是用image美化一下……

唉