首先得看你的控件是否支持mousemove事件如果支持,那就好办了,在mousemove事件中加入代码如果不支持,那可以通过判断鼠标所在的窗口位置。另外,好像有API支持,但我不知道是哪个。

解决方案 »

  1.   

    用Win98新增API:TrackMouseEvent可参考:
    http://www.vbaccelerator.com/home/VB/Code/Libraries/Subclassing/Generating_MouseLeave_Events_for_a_Window/article.asp
      

  2.   

    一般控件都有Hint属性把信息写进去就可以了。
      

  3.   

    Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    MsgBox "你把鼠标移到了按钮上"
    End Sub
      

  4.   

    一般情况下用: MouseMove事件。
      

  5.   

    我是说在窗体的move事件里,那样就不用在每个控件的mousemove事件里判断了
    一个一个地去判断了,你们误会我的意思了:)————我想做个函数,把它放到窗体move事件上,当鼠标移动到任何控件上的时候,
    显示提示文本
      

  6.   

    用ToolTipText属性,每个控件都有啊,
      

  7.   

    那也不一定每个控件都有tooltiptext属性比如滚动条控件就没有
      

  8.   

    我是说在窗体的move事件里,那样就不用在每个控件的mousemove事件里判断了
    一个一个地去判断了,你们误会我的意思了:)————我想做个函数,把它放到窗体movemouse事件上,当鼠标移动到任何控件上的时候,
    显示提示文本 private sub form1_mousemove()
        dim  ctl as control     for each ctl in controls
               if 鼠标移动到控件上了 then ctl.tooltiptext=什么什么
          next ctl
     end sub
    怎么才能知道鼠标已经移动到了控件上了???
    我不想在每个控件的vmousemove事件上都多判断,这样很麻烦
    象上面的代码那样,怎么判断鼠标移动到了控件上了???????????????????????????????????????????????????? 
      

  9.   

    我是说在窗体的move事件里,那样就不用在每个控件的mousemove事件里判断了
    一个一个地去判断了,你们误会我的意思了:)————我想做个函数,把它放到窗体movemouse事件上,当鼠标移动到任何控件上的时候,
    显示提示文本 private sub form1_mousemove()
        dim  ctl as control     for each ctl in controls
               if 鼠标移动到控件上了 then ctl.tooltiptext=什么什么
          next ctl
     end sub
    怎么才能知道鼠标已经移动到了控件上了???
    我不想在每个控件的vmousemove事件上都多判断,这样很麻烦
    象上面的代码那样,怎么判断鼠标移动到了控件上了????????????????????????????????????????????????????