提示栏

那就SetCapture ReleaseCapture 算了

解决方案 »

  1.   


    Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
          if statusbasr1.panels(0).text<>command1.tooltiptext then             statusbasr1.panels(0).text=command1.tooltiptext      end if
    End Sub
      

  2.   

    to:dingming(丁叮)　
    这个方法我也知道
    你大可不必判断，直接
    statusbasr1.panels(0).text=command1.tooltiptext
    就可
    我可不想使用MOUSE_MOVE检测
      

  3.   

    总是要检测鼠标的，你不会放着简单的不用而要用API吧？