Visual Basicでマウス座標を取得する方法

あなたが次のヒットコンピュータゲームを書いているか簡単な描画プログラムを作成しているかどうか、あなたはユーザーのマウスカーソルがコンピュータスクリーン上にあるところを知る必要があるかもしれません。 Visual Basic開発者には、マウスなどのデバイスを追跡するのに役立つ一連のクラスライブラリがあります。 これらのクラスのいずれかを使用すると、数行のVisual Basicコードを使用してマウスの水平座標と垂直座標を判断するのに役立ちます。

1。

Microsoft Visual Studioを起動して、いずれかのVisual Basicプロジェクトを開きます。

2。

そのプロジェクトの起動フォームをダブルクリックします。 Visual Studioのデザインウィンドウにフォームが表示されます。

3。

ツールボックスからフォーム上にパネルコントロールをドラッグし、 "F4"を押してプロパティウィンドウを表示します。

4。

そのウィンドウの上部にある[イベント]ボタンをクリックし、[クリック]イベントボタンをダブルクリックします。 コードウィンドウが開き、パネルのClickメソッドが表示されます。

5。

そのメソッドに次のコードを貼り付けます。

点の座標として点の座標点xの座標としてInt16の点座標の座標としてInt 16

座標= Panel1.PointToClient(MousePosition)x座標=座標.X y座標=座標.Y

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

最初のステートメントは、 "coordinates"という名前の新しいポイント変数を作成します。 4行目に示されているPointToClientメソッドは、パネルの左上端に対する現在のマウス位置を取得します。 「Panel1」を自分のパネルの名前に置き換えます。 xCoordinate変数は水平位置を含み、yCoordinate変数は垂直位置を保持します。 最後のステートメントは、パネルをクリックするとこれら2つの値を示すメッセージボックスを表示します。

6。

前の手順でリストしたコードの下に次のコードを追加します。

coordinates = Me.PointToClient(MousePosition)xCoordinate = coordinates.X yCoordinate = coordinates.Y MessageBox.Show(xCoordinate.ToString()+ " - " + yCoordinate.ToString())

このコードは、前の手順で示した最後の4つのステートメントとほとんど同じです。 最初の行は以下のように異なります。

coordinates = Me.PointToClient(MousePosition)

このステートメントは、パネルではなくフォームを基準とした現在のマウス位置を取得します。 メッセージボックスには、水平座標と垂直座標が表示されます。

7。

F5キーを押してプロジェクトを実行します。 フォームが開き、フォームとそこに含まれるパネルが表示されます。 フォームの内側をクリックすると、パネルの左上端を基準にしてクリックした点の水平座標と垂直座標がメッセージボックスに表示されます。

8。

Enterキーを押してください。 メッセージボックスが閉じ、コードが実行され続け、2番目のメッセージボックスが表示されます。 このメッセージボックスには、フォームの左上隅を基準とした座標が表示されます。

先端

  • プログラミングするときは、設計目標に合ったカーソル検出方法を使用してください。 1つの例では、カーソルが画像、パネル、またはフォーム上の他のコントロールのどこにあるのかを気にする必要があります。 別の方法では、カーソルがフォームの左上隅のどこにあるかを知る必要があるかもしれません。