تقييم الموضوع :
  • 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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] كيف اجعل listbox تستوعب اكبر عدد ممكن من الكلمات او الارقام e-coder 1 61 16-04-18, 04:55 PM
آخر رد: e-coder
  كيف اجعل الكود يكتب التاريخ بجوار اسم قاعدة البيانات عند النسخ الاحتياطي السيد الجوهري 2 106 13-04-18, 12:43 AM
آخر رد: سعود
  [VB.NET] مرة اخرى انا مش عاوز اضيف عمود جديد dgv انا اريد جعل العمود الثالث يكون combobox tarek 2 85 07-04-18, 04:28 AM
آخر رد: tarek
  [سؤال] كيف اجعل تكست داخل كريستال ريبورت قابل للكتابة وقت عرض التقرير السيد الجوهري 2 92 24-01-18, 10:35 PM
آخر رد: السيد الجوهري
  [سؤال] كيف اجعل البرنامج لا يفتح مدونتى الا مرة واحدة فى اليوم ابو روضة 17 581 15-01-18, 02:10 AM
آخر رد: ابو روضة
  [سؤال] لو سمحتوا كيف اضيف أيام على التاريخ المُدخل؟ Nedaa 2 112 02-01-18, 03:44 PM
آخر رد: Nedaa
  كيف اجعل مربع النص لا يقبل سوي الارقام ولا يقبل المسافات او المسطره ؟ DanyGhost2010 1 109 01-01-18, 03:40 AM
آخر رد: ملهمـ
  أريد كود عند الضغط علي زر بوتن اجعل التكست بوكس يكون للقرائة فقط ؟ DanyGhost2010 1 102 31-12-17, 04:42 PM
آخر رد: طالب برمجة
  [VB.NET] كيف اجعل عمود بالداتا جريد فيو يساوي نفس ارقام العمود السابق له مع حذف ارقام اقل من ص السيد الجوهري 1 109 22-11-17, 12:30 AM
آخر رد: محمد بن عطية
  كيف اجعل خليه في الداتا جريد فيو تظهر بلون معين بناء على شرط في خليه اخرى من نفس الصف samawi 2 128 16-11-17, 06:40 AM
آخر رد: samawi

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


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