Cómo cambiar el cursor predeterminado en Visual Basic 6

Cuando un usuario mueve el puntero del ratón sobre el programa , el icono predeterminado del cursor es el puntero . Visual Basic 6 le permite cambiar el valor predeterminado utilizando la propiedad MousePointer para varios objetos en el formulario. Por ejemplo , es posible cambiar el cursor de flecha a cualquier otra cosa , como una cruz , una viga , una flecha con un signo de interrogación o un cursor personalizado se carga en el programa. Cambie el código de cualquiera de las funciones MouseMove para los diversos controles en el formulario , o incluso para todo el propio formulario. Instrucciones
1

Abra el programa de Visual Basic . Acceda a la ventana de código
2

Abra la función Form_MouseMove y escriba lo siguiente : .

Form1.MousePointer = vbCrosshair

Cuando el usuario pasa su puntero sobre la forma , los predeterminados cursor cambia a una cruz
3

abrir la función Label1_MouseMove y escriba lo siguiente : .

Label1.MousePointer = vbSizeNS

Cuando el usuario se desplaza sobre Label1 (suponiendo que este control existe en su forma ) , el valor predeterminado cursor cambia a una flecha que apunta hacia el norte y el sur. Esto anula el puntero de precisión que se muestra en el resto del formulario
4

Abra la función Label2_MouseMove y escriba lo siguiente : .

Label2.MouseIcon = LoadPicture ("C: \\ MyCursor . act " )

Label2.MousePointer = vbCustom

Cuando el usuario pasa más de Label2 (suponiendo que este control existe en su forma ) , el valor predeterminado cursor se convierte en un cursor personalizado proporcionado en la función LoadPicture . Asegúrese de que la ruta de acceso en la lista de parámetros coincide con la que ha guardado el archivo de cursor .