[asmarsou]

(06-08-22, 10:58 PM)سعود كتب : بصراحة لاول مرة افكر بهذا و ان شاء الله ان الكود هو ماتريد:

PHP كود :

Public Class Form1
    Dim fltr As String = ""
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim o As New OpenFileDialog
        o.Filter = fltr
        o.ShowDialog()
    End Sub
    Private Sub CheckBox1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles CheckBox4.CheckedChanged, CheckBox3.CheckedChanged, CheckBox2.CheckedChanged, CheckBox1.CheckedChanged
        '‎(*.txt)|*.txt|كافة الملفات (*.*)|*.*"
        Dim ch As CheckBox = DirectCast(sender, CheckBox)
        Dim firstfilter As String = "(" & ch.Tag & ")|*." & ch.Tag & ""
        Dim otherfilter As String = "| Other extensions (" & ch.Tag & ")|*." & ch.Tag & ""
        If ch.Checked = True Then
            If fltr.Trim = "" Then
                If fltr.Contains(firstfilter) = False Then
                    fltr = firstfilter
                End If
            Else
                If fltr.Contains(otherfilter) = False Then
                    fltr &= otherfilter
                End If
            End If
        Else
            If fltr.Contains(firstfilter) Then
                fltr = fltr.Remove(fltr.IndexOf(firstfilter), firstfilter.Length)
            End If
            If fltr.Contains(otherfilter) Then
                fltr = fltr.Remove(fltr.IndexOf(otherfilter), otherfilter.Length)
            End If
        End If
    End Sub
End Class 


---

نضع تاق لكل تشك بوكس

 الله اكبر ما شاء الله و لا قوة الا بالله
الف شكر استاذ