تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف نحدد طريقة غلق النافذة ؟
#1
السلام عليكم و رحمة الله و بركاته

كان هناك فى الكود القديم فى فيجوال بيسك ٦ الحدث QueryUnload
و كان له معامل Parameter اسمه  UnloadMode والذى يحدد هل غلق النافذة تم من خلال غلقها (بواسطة المسخدم) ام من خلال الكود
Unload Form1
والسؤال هو ما هو البديل فى Vb.net

شكرا والسلام عليكم
الرد }}}
تم الشكر بواسطة:
#2
و عليكم السلام ورحمة الله و بركاته
يوجد حدث closing للفورم وحدث closed  دقق فيها وستجد الطريق لتطبيق ماتعرفه في vb6.0.

طبقت الفكرة اللي عندي على السريع
PHP كود :
Public Class Form1
    Dim cl 
As Boolean
    Dim apath 
As String IO.Path.GetDirectoryName(Application.ExecutablePath)
 
   Dim cltxt As String apath "\cl.txt"
 
   Private Sub save()
 
       IO.File.WriteAllText(cltxtcl.ToString)
 
   End Sub
    Private 
Function gt() As String
        Return My
.Computer.FileSystem.ReadAllText(cltxt)
 
   End Function
 
   Private Function IsNormal(As String) As Boolean
        If t
.ToString.Trim.ToLower "true" Then Return True Else Return False
    End 
Function
 
   Private Sub Form1_FormClosed(sender As ObjectAs System.Windows.Forms.FormClosedEventArgsHandles Me.FormClosed
        save
()
 
   End Sub
    Private Sub Form1_FormClosing
(sender As ObjectAs System.Windows.Forms.FormClosingEventArgsHandles Me.FormClosing
        cl 
True
    End Sub
    Private Sub Form1_Load
(sender As System.ObjectAs System.EventArgsHandles MyBase.Load
        If IsNormal
(gt) = False Then
            MsgBox
("لم يتم اغلاق الفورم بشكل صحيح"MsgBoxStyle.Information"")
 
       End If
 
       IO.File.WriteAllText(cltxtString.Empty)
 
   End Sub
    Private Sub Button1_Click
(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        Hide
()
 
       End
    End Sub
End 
Class 
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو , mmaalmesry
#3
شكرا جزيلا لك
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  محتاج طريقة لتنسيق نص الرسالة المرسلة إلى الواتس اب new_programer 2 163 04-03-24, 07:15 AM
آخر رد: new_programer
  طريقة اجراء نسخة احتياطية و استرجاعها ؟ Osama NY 2 461 07-02-24, 08:59 PM
آخر رد: Kamil
  ماهي طريقة نقل محتويات checkedlistbox الى داتاقريدفيو صالح عبدالله 3 253 06-01-24, 03:20 PM
آخر رد: Kamil
  [VB.NET] ما هي طريقة استدعاء الازرار في الكيبورد من خلار زر افتراضي haider.mohsin92 1 295 14-12-23, 03:19 PM
آخر رد: Kamil
  طريقة عرض التقرير كريستال ريبورت في جهاز العميل Adel27213 2 347 10-12-23, 04:03 AM
آخر رد: Adel27213
  طريقة إسناد اكثر من جدول للكريستال ريبورت Adel27213 2 353 25-11-23, 11:51 PM
آخر رد: Adel27213
  طريقة تحويل الأرقام إلى حروف Adel27213 2 495 18-11-23, 01:40 AM
آخر رد: sniper2030
  التحكم فى عرض طريقة التاريخ فى الاداة datetimepicker Ahmed.vb 3 507 08-11-23, 01:27 AM
آخر رد: الحزين اليماني
  طريقة جلب صف من قاعدة البيانات بشرط العمود ٤ لا يساوي فارغ Adel27213 2 423 07-11-23, 05:02 AM
آخر رد: Adel27213
  طريقة نقل بيانات عمود من جدول إلى جدول اخر Adel27213 4 447 06-11-23, 07:35 AM
آخر رد: justforit

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


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