반응형 MousePosition2 비쥬얼베이직(비주얼베이직)visual basic,vb.net 강좌-창 드래그해서 움직이기,MousePosition,MouseButtons 폼만 하나 달랑 디자인 합니다 Public Class Form1 Dim point As New System.Drawing.Point() Dim X, Y As Integer Private Sub Form1_MouseDown(sender As Object, e As MouseEventArgs) Handles Me.MouseDown X = Control.MousePosition.X - Me.Location.X Y = Control.MousePosition.Y - Me.Location.Y End Sub Private Sub Form1_MouseMove(sender As Object, e As MouseEventArgs) Handles Me.MouseMove If e.Button = Windows.Forms.Mo.. 2017. 1. 18. 비쥬얼베이직(비주얼베이직)visual basic,vb.net강좌-마우스 따라다니는 이미지,MousePosition, Timer,PictureBox vb.net강좌-마우스 따라다니는 이미지밑에 그림처럼 구현합니다. pictureBosx 2개 , timer 1개 디자인합니다. pictureBosx 속성설정 2가지 입니다. Public Class Form1 Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick 'MousePosition 을 사용하거나, Windows.Forms.Cursor.Position를 2가지를 사용합니다. PictureBox1.Location = New Point(MousePosition.X - 50, MousePosition.Y - 50) PictureBox2.Location = New Point(Windows.Forms.Cursor.Positi.. 2017. 1. 18. 이전 1 다음 반응형