Wanneer een gebruiker zijn muis beweegt over het programma , het standaard pictogram cursor is de aanwijzer . Visual Basic 6 kunt u de standaardinstelling wijzigen met de eigenschap MousePointer voor diverse objecten op uw formulier . Bijvoorbeeld , kunt u de cursor veranderen in iets anders , zoals een crosshair , een I - balk , een pijl met een vraagteken of zelfs een aangepaste cursor kunt laden in het programma . Wijzig de code in een van de MouseMove functies van de verschillende controles in het formulier , of zelfs het gehele formulier zelf . Instructies
1 Open de Visual Basic -programma . Open het venster code kopen van 2 Open de Form_MouseMove functie en typ het volgende : . Form1.MousePointer = vbCrosshair
Wanneer de gebruiker zweeft haar aanwijzer op het formulier , de standaard cursor verandert in een draadkruis
3 Open de Label1_MouseMove functie en typ het volgende : . Label1.MousePointer = vbSizeNS
Wanneer de gebruiker zweeft boven Label1 ( ervan uitgaande dat deze controle bestaat op uw formulier ) , de standaard cursor verandert in een pijl die wijst noorden en het zuiden . Dit overschrijft de crosshair cursor die wordt weergegeven op de rest van het formulier
4 Open de Label2_MouseMove functie en typ het volgende : . Label2.MouseIcon
= LoadPicture ( " C : \\ myCursor . huidig " ) Label2.MousePointer = vbCustom
Wanneer de gebruiker zweeft boven Label2 ( ervan uitgaande dat deze controle bestaat op uw formulier ) , de standaard cursor verandert in een aangepaste cursor voorzien in de LoadPicture functie . Controleer of het pad in de lijst met parameters overeenkomt waar u het bestand cursor naar opgeslagen .
|
