حرکت Button بر روی فرم

[KhanDaii]

سلام بر مهندسین . . .
یه سوال ساده دارم:
چجوری می شه یه Button رو روی فرم حرکت داد؟ :متفکر:
با تشکر . . .

[kebriya]

منظورت درگ بشه یا اینکه با تایمر حرکت کنه؟

[KhanDaii]

منظورت درگ بشه یا اینکه با تایمر حرکت کنه؟

منظورم اینه که درگ بشه

[amin_iman82]

اول AllowDrop فرم رو برابر True قرار بدین بعد:



Private Sub Form1_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Me.DragDrop
Button1.Location = New Point(e.X - Me.Location.X, e.Y - Me.Location.Y)
End Sub

Private Sub Form1_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Me.DragEnter
e.Effect = DragDropEffects.Move
End Sub

Private Sub Button1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button1.MouseDown
Button1.DoDragDrop(Me, DragDropEffects.Move)
End Sub

[KhanDaii]

اول AllowDrop فرم رو برابر True قرار بدین بعد:



Private Sub Form1_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Me.DragDrop
Button1.Location = New Point(e.X - Me.Location.X, e.Y - Me.Location.Y)
End Sub

Private Sub Form1_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Me.DragEnter
e.Effect = DragDropEffects.Move
End Sub

Private Sub Button1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button1.MouseDown
Button1.DoDragDrop(Me, DragDropEffects.Move)
End Sub


جواب نداد! چرا؟
این کد رو خودت امتحان کردی؟

[kyrie-chan]

سلام . من تازه واردم و نمیدونم کجا سوالم بگم ، اما چون خیلی حیاتیه و تا فردا وقت دارم ، لطفا بهم کمک کنین.
استاد خواسته به زبان vb.net برنامه ای بنویسیم که یک دکمه روی صفحه باشه . یک صفحه دیگه باز شه و مقدار گام های جا به جا شدن دکمه رو توش وارد کنیم و اوکی بزنیم . بعد تو اون صفحه اولیهاگه دکمه "w" زد بره بالا ، اگه "a" زد بره چپ ، اگه "d" زد بره راست و اگه "x" زد بره پایین . در ضمن اگه دکمه به کادرها رسید ، دکمه نزنه بیرون ، از کادر مقابل در بیاد .

این راهنمایی ها رو هم بهمون کرده :


برای پنجره ای که گام ها رو میگیره اینُ تعریف کنید :
در رویداد load فورم x=inputbox رو قرار بدین .
از msgbox.keychar برای گرفتن کد دکمه ها استفاده کنین و خاصیت kyepreviewرو true کنین .


طراحی و زیبا سازی نمره اضافه دارد . فقط کد ها ساده باشن که من مبتدی درکش کنم .

ببخشین ولی تو رو خدا زودی تا امشب بدین که من بخونم فدا به استاد میدم ضایع نشم ، هیچی ندونم . مرسی

[shadi khanum]

دوست عزیز این sample رو ببین. میتونی هر کنترلی رو روی فرم حرکت بدی و همچنین Resize هم بکنی
موفق باشی
http://www.codeproject.com/Articles/30836/The-Dragable-Container