منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

بسم الله الرحمن الرحيم
السلام عليكم و رحمة الله و بركاته,

يوجد لدي واجهة بإسم (InvFrm), لو أردت منع المستخدم من أن يفتح نفس الواجهة لاكثر من مرة بدون غلقها فكيف ذلك؟
أي, لو أنه كان فاتح هذه الواجهة, فلن يستطيع الضغط على زر فتح هذه الواجهة مرة أخرى بدون إغلاقها.

و لو أردت تمكين المستخدم من أن يفتح هذه الواجهة بنفس الوقت أكثر من مرة (لنقل خمس مرات فقط و ليس أكثر) فكيف ذلك؟

تحياتي

ارجو ان يكون هو ماتريد

كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        For Each f As Form In My.Application.OpenForms

            If f.Name = "frm_InvFrm" Then

                Exit Sub

            End If

        Next

        Dim frm_InvFrm_new As New frm_InvFrm

        frm_InvFrm_new.Name = "frm_InvFrm"

        frm_InvFrm_new.Show()

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Dim n As Integer = 0

        For Each f As Form In My.Application.OpenForms

            If f.Name = "frm_InvFrm" Then

                n += 1

            End If

            If n > 4 Then

                Exit Sub

            End If

        Next

        Dim frm_InvFrm_new As New frm_InvFrm

        frm_InvFrm_new.Name = "frm_InvFrm"

        frm_InvFrm_new.Show()

    End Sub

جزاكم الله خيراً يا إخواني على أجوبتكم الرائعة Smile

و أسف على التأخير في الرد على أجوبتكم Smile

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

hoob computer

سعود

tariq2812

hoob computer