السلام عليكم
عندي زر تسجيل الخروج فعند الضغط عليه يقوم باغلاق كل الفورم ويفتح لي شاشة تسحيل الدخول
ولكن المشكله ان فيه فورم ممكن يكون مفتوح في الخلف
فاريد عند الضغط يقوم بالخروج من كل الفورم حتي الرءيسيه ويفتح شاشة تسجيل الدخول
وجزاكم الله خيرا
(17-03-22, 10:28 AM)Emam emam كتب : [ -> ]السلام عليكم
عندي زر تسجيل الخروج فعند الضغط عليه يقوم باغلاق كل الفورم ويفتح لي شاشة تسحيل الدخول
ولكن المشكله ان فيه فورم ممكن يكون مفتوح في الخلف
فاريد عند الضغط يقوم بالخروج من كل الفورم حتي الرءيسيه ويفتح شاشة تسجيل الدخول
وجزاكم الله خيرا
و عليكم السلام و حمة الله و بركاته
تفضل هذا مثال لغلق جميع الشاشات المفتوحة عدا الفورم 3 باعتبارها شاشة تسجيل الدخول كما ذكرت في نص سؤالك
لكي يعمل الكود بشكل سليم افتح نافة خصائص المشروع و غير في خاصية اغلاق التطبيق من
- عند اغلاق الفورم الرئيسية الى
-عند اغلاق آخر فورم مفتوحة
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
My.Application.OpenForms.Cast(Of Form)() _
.Except({Form3}) _
.ToList() _
.ForEach(Sub(form) form.Close())
'.Except({Form3}) هذالاستثناء الفورم المحدد من الغلق هنا فورم 3 لن تغلق
End Sub
(18-03-22, 12:22 PM)asmarsou كتب : [ -> ] (17-03-22, 10:28 AM)Emam emam كتب : [ -> ]السلام عليكم
عندي زر تسجيل الخروج فعند الضغط عليه يقوم باغلاق كل الفورم ويفتح لي شاشة تسحيل الدخول
ولكن المشكله ان فيه فورم ممكن يكون مفتوح في الخلف
فاريد عند الضغط يقوم بالخروج من كل الفورم حتي الرءيسيه ويفتح شاشة تسجيل الدخول
وجزاكم الله خيرا
و عليكم السلام و حمة الله و بركاته
تفضل هذا مثال لغلق جميع الشاشات المفتوحة عدا الفورم 3 باعتبارها شاشة تسجيل الدخول كما ذكرت في نص سؤالك
لكي يعمل الكود بشكل سليم افتح نافة خصائص المشروع و غير في خاصية اغلاق التطبيق من
- عند اغلاق الفورم الرئيسية الى
-عند اغلاق آخر فورم مفتوحة
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
My.Application.OpenForms.Cast(Of Form)() _
.Except({Form3}) _
.ToList() _
.ForEach(Sub(form) form.Close())
'.Except({Form3}) هذالاستثناء الفورم المحدد من الغلق هنا فورم 3 لن تغلق
End Sub
الف شكر اخي علي اهتمامك
وجزاكم الله خيرا علي الكود
الكود اشتغل كويس الحمد لله
بارك الله فيك وزادك الله علما