منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - تحويل كود من أداة SSTab إلى أداة TabControl

هذا كود مقتبس من مشروعي في الفيجوال بيسك6 لأداة SSTab1

كود :

Private Sub History_Click()

Form1.Show

Form1.Lb1.Caption = "تصنيفات تاريخ النشر"

Form1.SSTab1.Tab = 0

Form1.SSTab1.TabEnabled(1) = False

Form1.SSTab1.TabEnabled(2) = False

End Sub

Private Sub use_Click()

Form1.Show

Form1.Lb1.Caption = "تصنيفات أسماء المؤلفين"

Form1.SSTab1.Tab = 1

Form1.SSTab1.TabEnabled(0) = False

Form1.SSTab1.TabEnabled(2) = False

End Sub

Private Sub Role_Click()

Form1.Show

Form1.Lb1.Caption = "تصنيفات دور النشر"

Form1.SSTab1.Tab = 2

Form1.SSTab1.TabEnabled(0) = False

Form1.SSTab1.TabEnabled(1) = False

End Sub

فهل يمكن أساتذتي الكرام تحويله لأداة TabControl في الدوت نت

تجميد صفحة يكون من خلال الكود :

كود :

TabControl1.Controls(2).Enabled = False

والتفعيل يكون بالعكس ..
===

أما اخفائها يكون من خلال الكود :

كود :

TabControl1.TabPages.Remove(TabPage1)

وإظهار التبويب من خلال الكود :

كود :

TabControl1.TabPages.Add(TabPage1)

أما تغيير مسمى تبويب يكون من خلال الكود :

كود :

TabControl1.TabPages(1).Text = "منشورات حارتنا"

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

مصمم هاوي

Taha Okla