تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
شلون اجعل للزر حركة و شلون اضيف العلامات
#1
السلام عليكم

شباب شلون اخلي للزر حركة
يعني اول ما تنفتح النفاذة مثلا يجي الزر من اليسار لليمين و يوقف عن مكان

و السؤال الثاني ابغي اكواد هاذي العلامات الي في صورة عشا احطهم على زر
الرد
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاتة

اولا: بخصوص تحريك الزر من اليسار الى اليمين انا لا افهم ماذا تريد بالتحديد

ولاكن اذا كان على تغير موضع الزر فهذا هو الكود

كود :
Button1.Location = New Point(x,y)


ثانا: بخصوص اكواد الازرار

كود :
'Close Button
        Me.Close()

        'Maximized Button
        Me.WindowState = FormWindowState.Maximized

        'Minimized Button
        Me.WindowState = FormWindowState.Minimized

-----------------------
Software Developer

Microsoft Partner

الرد
تم الشكر بواسطة: سعود , @@أبورائد@@ , kslawy
#3
هذا كلاس بسيط
كود :
Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Control.CheckForIllegalCrossThreadCalls = False
        btn_close.Left = Panel1.Left - btn_close.Width
        btn_minimize.Left = Panel1.Left - btn_close.Width + btn_minimize.Left

        If bgw_btn_close.IsBusy Then Exit Sub
        bgw_btn_close.RunWorkerAsync()

    End Sub

    Private Sub bgw_btn_close_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles bgw_btn_close.DoWork
        Threading.Thread.Sleep(1500)
        Do Until btn_close.Left >= Panel1.Right - btn_close.Width
            btn_close.Left += 1
        Loop
    End Sub

    Private Sub btn_close_Click(sender As Object, e As EventArgs) Handles btn_close.Click
        End
    End Sub

    Private Sub btn_close_Move(sender As Object, e As EventArgs) Handles btn_close.Move
        btn_minimize.Left = btn_close.Left - btn_minimize.Width
    End Sub

    Private Sub btn_minimize_Click(sender As Object, e As EventArgs) Handles btn_minimize.Click
        Me.WindowState = FormWindowState.Minimized
    End Sub
End Class


عطل مربع الازرار وضع اعلى الفورم بانل لتضع بها زرين عين لهما صورة تعبر عن مؤداهما
اضف backgroundworker
الرد
تم الشكر بواسطة: @@أبورائد@@ , sherif khalid , kslawy , sooriaty03


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Lightbulb اجعل حسابك علي اي موقع online دائماً YousefOkasha 0 123 26-07-18, 05:37 AM
آخر رد: YousefOkasha
  [VB.NET] كيف اجعل شريط التمرير ف الداتا جريد يتحرك اتوماتيك الي اخر سجل تم اضافته محمد صلاح ابراهيم 2 144 21-07-18, 03:08 PM
آخر رد: elgokr
  اضافة حركة لليبل حافظ حافظ 7 251 21-07-18, 12:11 AM
آخر رد: elgokr
  كيف اجعل الكلمات تحت بعضها فى الليست بوكس ابو روضة 5 186 16-07-18, 01:34 AM
آخر رد: elgokr
  [سؤال] كيف اجعل مشروعى يعمل على كل الاجهزة gamal calc 5 197 13-07-18, 05:21 PM
آخر رد: gamal calc
  [سؤال] كيف يمكنني ان اضيف خرائط جوجل الي برنامجي ؟ dametucorazon 4 169 22-06-18, 09:44 PM
آخر رد: elgokr
  [سؤال] كيف اجعل الفورم يعمل على جميع الشاشات بدون تغيير او ضياع الكائنات داخل الفورم في vb.n اسيل1 1 218 20-06-18, 06:20 PM
آخر رد: محمد كريّم
  هل يمكن ان اجعل جدول على شكل مسودة اي بعد الحذف تحول البيانات الى المسودة hassan 14 1 145 09-06-18, 03:48 PM
آخر رد: elgokr
  [VB.NET] كيف اضيف برنامج مكتوب ب vb.net الى برنامج sap 2000..و شكرا larbi oussama 0 92 08-06-18, 07:33 PM
آخر رد: larbi oussama
  [سؤال] كيف اضيف كود java script للفيجوال بيسك Mina Botros 2 187 22-05-18, 03:35 PM
آخر رد: Mina Botros

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم