هاوي الأكسس
-
Posts
60 -
تاريخ الانضمام
-
تاريخ اخر زياره
Community Answers
-
هاوي الأكسس's post in (تمت الفائدة) عملية فرز تصاعدية وتنازلية من خلال زر واحد was marked as the answer
شكرا لاهتمامك أخي الكريم
ومعذرة لعدم ارسال مثال
فقد توقعت أنه مجرد كود بسيط !
على كل حال لقد توصلت لحل المشكلة بتعديل بسيط في الكود وهو كالتالي :
Private Sub TabItemName_Label_Click() If [TabItemName_Label] = -1 Then Me.OrderBy = "[TabItemName]" & " DESC" Me.OrderByOn = True Else Me.OrderBy = "[TabItemName]" Me.OrderByOn = True End If End Sub
تقبل تقديري