请问如何是当鼠标移到某个控件(如文本框),鼠标变成一个手指。

解决方案 »

  1.   

    在这个控件的mousemove事件中加入代码,改变鼠标的图标
    例子为一个label控件Private Sub Label8_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
        Label8(Index).ForeColor = vbRed
        Label8(Index).FontUnderline = True
        Label8(Index).MousePointer = 99
    End Sub
      

  2.   

    Text1的MousePointer属性设为99,MouseIcon属性设为"c:\windows\cursors\harrow.cur"
      

  3.   


       首先要一个手指形状的鼠标文件,然后先设其MousePointer属性设成99-Custom,再在MouseIcon中装入你那鼠标文件就可以了!