Microsoft Office Access
Ver Más instrucciones
1
Abra Microsoft Office Access y seleccione "Base de datos en blanco ", y luego haga clic en " Crear". Haga clic en "Herramientas de base de datos" y seleccione "Visual Basic ". Haga clic en el menú "Insertar " y seleccione
2
Escriba lo siguiente para crear un nuevo subprograma "Módulo ". :
ChangeCursor Sub Private ()
Prensa " Escriba "
3
Escriba lo siguiente para llamar a la " función " y cambiar el cursor a un" assignCursorVal I Beam ": .
assignCursorVal ( 3 )
Página 4
Escriba lo siguiente para llamar a la función " assignCursorVal " y cambia el cursor a una "flecha doble vertical" :
assignCursorVal ( 7 )
5
Tipo lo siguiente para llamar a la función " assignCursorVal " y cambiar el cursor a una "flecha doble horizontal" :
assignCursorVal ( 9 )
6
Escriba lo siguiente para llamar al " assignCursorVal " función y cambiar el cursor a un " Hour Glass ":
assignCursorVal ( 11 )
7
Escriba lo siguiente para llamar a la función " assignCursorVal " y cambia el cursor a un puntero estándar :
assignCursorVal ( 1 )
8
Escriba lo siguiente para crear el subprograma " assignCursorVal ":
Private Sub assignCursorVal ( pntrNum As Integer )
< p> Screen.MousePointer = pntrNum
End Sub
Press "F5 " para ejecutar la subrutina.