Kā iegūt peles koordinātas Visual Basic

Neatkarīgi no tā, vai rakstāt nākamo datoru spēli vai izveidojat vienkāršu zīmēšanas programmu, jums var būt nepieciešams zināt, kur lietotāja peles kursors atrodas uz datora ekrāna. Visual Basic izstrādātājiem ir iebūvēts klases bibliotēku komplekts, kas var palīdzēt tiem izsekot ierīces, piemēram, peli. Jūs varat izmantot kādu no šīm klasēm, lai palīdzētu noteikt horizontālās un vertikālās peles koordinātas, izmantojot dažas Visual Basic koda rindas.

1.

Palaidiet Microsoft Visual Studio un atveriet kādu no saviem Visual Basic projektiem.

2.

Veiciet dubultklikšķi uz šī projekta sākuma veidlapas. Visual Studio parāda formu logā Design.

3.

Velciet paneļa vadību no rīklodziņa uz veidlapu un nospiediet "F4", lai parādītu Rekvizītu logu.

4.

Noklikšķiniet uz pogas "Notikumi" šī loga augšpusē un veiciet dubultklikšķi uz "Noklikšķiniet" notikuma pogas. Tiek atvērts koda logs un parādīta paneļa klikšķu metode.

5.

Ielīmējiet šo kodu šādā metodē:

Dim koordinātas kā punkts Dim x Koordinēt kā Int16 Dim yCoordinate As Int16

koordinātas = Panel1.PointToClient (MousePosition) xCoordinate = koordinātas.X yCoordinate = koordinātas.Y

MessageBox.Show (xCoordinate.ToString () + "-" + yCoordinate.ToString ()

Pirmais paziņojums izveido jaunu punktu mainīgo nosaukumu "koordinātas". PointToClient metode, kas parādīta 4. rindā, iegūst pašreizējo peles pozīciju attiecībā pret paneļa augšējo kreiso malu. Aizstāt "Panel1" ar paneļa nosaukumu. XCoordinate mainīgais satur horizontālo pozīciju un yCoordinate mainīgais satur vertikālo pozīciju. Galīgajā pārskatā tiek parādīts ziņojuma lodziņš, kas uzrāda šīs divas vērtības, noklikšķinot uz paneļa.

6.

Pievienojiet šādu kodu zem iepriekšējā solī norādītā koda:

koordinātas = Me.PointToClient (MousePosition) xCoordinate = koordinātas.X yCoordinate = koordinates.Y MessageBox.Show (xCoordinate.ToString () + "-" + yCoordinate.ToString ()

Šis kods ir gandrīz identisks pēdējiem četriem apgalvojumiem, kas parādīti iepriekšējā posmā. Pirmā rinda atšķiras, kā parādīts zemāk:

koordinātas = Me.PointToClient (MousePosition)

Šis paziņojums iegūst pašreizējo peles pozīciju attiecībā pret formu, nevis paneļa. Ziņojuma lodziņā ir redzamas horizontālās un vertikālās koordinātas.

7.

Nospiediet F5, lai palaistu projektu. Veidlapa tiek atvērta un tajā ir redzama tā veidlapa un tā panelis. Noklikšķiniet uz veidlapas iekšpusē, un ziņojuma lodziņā ir redzamas horizontālās un vertikālās koordinātes tajā punktā, kuru noklikšķinājāt attiecībā pret paneļa augšējo kreiso malu.

8.

Nospiediet "Enter". Ziņojuma lodziņš aizveras, kods turpina darboties un parāda otru ziņojumu lodziņu. Šajā ziņojuma lodziņā ir redzamas koordinātas attiecībā pret veidlapas augšējo kreiso malu.

Padoms

  • Programmējot izmantojiet kursora noteikšanas metodi, kas atbilst jūsu dizaina mērķiem. Vienā gadījumā jūs varat rūpēties tikai par to, kur kursors atrodas attēlā, panelī vai citā kontrolē, kas atrodas veidlapā. Citā, iespējams, būs jāzina, kur kursors ir attiecībā pret veidlapas augšējo kreiso malu.