Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vytvorenie nového projektu v jazyku Visual Basic kliknutím na tlačidlo " Súbor " , " New Project " a pomenujte ju " kríž kurzora Tutorial . " Nechajte ostatné možnosti pri predvolenom nastavení .
2
Presuňte tlačidlo do formulára z panela nástrojov .
3
Dvakrát kliknite na tlačidlo . Tým sa otvorí textový editor zdrojového kódu programu
4
vložte nasledujúci kód do textového editora nakreslite kríž vlasy : .
Dim bmCursor As New Bitmap ( 60 , 60 )
Dim g Ako Graphics = Graphics.FromImage ( bmCursor )
g.DrawLine ( Pens.Red , 30 , 0 , 30 , 60 )
g.DrawLine ( Pens.Red , 0 , 30 , 60 , 30 )
5
Vložte nasledujúci kód bezprostredne po poslednom kódu Ak chcete zmeniť aktuálne kurzor :
Me.Cursor = New kurzora ( bmCursor.GetHicon )