[ali.alfoly]

الحدث Load عند تحميل الفورم او عند فتح الفورم السؤال - ما الحدث الذى يحدث قبل تحميل الفورم
يعنى اريد عمل شئ معين قبل تحميل الفورم الرئيسى للبرنامج
اين يتم وضع الكود وما الحدث

[سعود]

اضف splash screen وضمن الحدث الخاص به اكتب ماتود التحقق منه.

[ربيع]

نحمده ونصلي على رسوله الكريم

عند تشغيل برنامج، تنطلق أربعة أحداث، وهي على النحو التالي:

كود :

[align=left]Public Class Form1

    Public Sub New()

        ' This call is required by the designer.
        InitializeComponent()

        ' Add any initialization after the InitializeComponent() call.
        MessageBox.Show("الحدث الأول")
    End Sub

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        MessageBox.Show("الحدث الثاني")
    End Sub

    Private Sub Form1_VisibleChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.VisibleChanged
        MessageBox.Show("الحدث الثالث")
    End Sub

    Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        MessageBox.Show("الحدث الرابع")
    End Sub

End Class
[/align]

[ali.alfoly]

مفيش طرق اخرى

[ali.alfoly]

اخى الغالى DreamsDotNet لم ارى مشاركتك
هذا بالعل ما اريده

الحدث

لنظر الى هذا الكود وقلى ما الخطاء به لانه لا يعمل للاسف

إقتباس : Public Sub New()

' This call is required by the designer.
InitializeComponent()

' Add any initialization after the InitializeComponent() call.
System.Threading.Thread.CurrentThread.CurrentUICulture = New System.Globalization.CultureInfo("ar")
Me.StartPosition = FormStartPosition.CenterScreen

End Sub

[ali.alfoly]

اسف على التكرار

[sooriaty03]

ali.alfoly كتب :اخى الغالى DreamsDotNet لم ارى مشاركتك
هذا بالعل ما اريده

الحدث

لنظر الى هذا الكود وقلى ما الخطاء به لانه لا يعمل للاسف

السلام عليكم
الخطأ أنك تركت مسافة بين الكلمة CurrentUICul ture
وهي كلمة واحدة فقط قم بإزالة المسافة وسيعمل بإذن الله

بالتوفيق

[Abu Ehab]

السلام عليكم ورجمة الله وبركاته
الترتيب كما هو متعارف عليه

PHP كود :

Public Class Form1

    Public Sub New()

        InitializeComponent()

        MessageBox.Show("1")
    End Sub


    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        MessageBox.Show("2")
    End Sub
    Private Sub Form1_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown

        MessageBox.Show("3")
    End Sub

    Private Sub Form1_VisibleChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.VisibleChanged
        MessageBox.Show("4")
    End Sub

    Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        MessageBox.Show("5")
    End Sub


End Class 


[ali.alfoly]

sooriaty03 كتب :السلام عليكم
الخطأ أنك تركت مسافة بين الكلمة CurrentUICul ture
وهي كلمة واحدة فقط قم بإزالة المسافة وسيعمل بإذن الله

بالتوفيق

الخطاء مش فى الكود نفسه الكود صحيح
لاكن الخطاء فى مكان وضع الكود

الكود يقوم بوضع الغه المحدده للفورم قبل الاقلاع
وعند وضع الكود فى اى حدث من هذه الاحاداث مترجم البرنامج يتجاهله لان الفورم سيكون قام بالاقلاع بالفعل
وهذا الكود يجب وضعه قبل اقلاع الفورم
وانت من حل المشكله بالفعل تعرف كيف عن طريق هذا الامر

sooriaty03 كتب :

ali.alfoly كتب :ضع الكود داخل حدث InitializeComponent

مش لاقى الحدث ده خاص بايه

من قائمة Solution Explorer
اضغط على زر Show All Files
ثم اضغط على السهم الخاص بالفورم
ثم قم بالضغط على ملف Form1.Designer.vb ضغطتين بالفأرة
سيظهر لك الكود قم بنسخ الكود السابق في أول سطر من الحدث InitializeComponent

Abu Ehab كتب :

السلام عليكم ورجمة الله وبركاته
الترتيب كما هو متعارف عليه

PHP كود :

Public Class Form1

    Public Sub New()

        InitializeComponent()

        MessageBox.Show("1")
    End Sub


    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        MessageBox.Show("2")
    End Sub
    Private Sub Form1_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown

        MessageBox.Show("3")
    End Sub

    Private Sub Form1_VisibleChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.VisibleChanged
        MessageBox.Show("4")
    End Sub

    Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        MessageBox.Show("5")
    End Sub


End Class 


جزاك الله خير ابو ايهاب والله واحشنى
وفعلا هذا الترتيب هو المتعارف عليه
وجزاك الله خير على المساعده