خاصية جيدة للأداة TextBox

مشكوووووووووووووووور

عساك على القوة

شكرا لك

جاري التحميل والتجربة

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

لقد قمت باضافة للمثال السابق و هي إضافة حالة رابعة خاصة بالأرقام العائمة (الكسرية أو العشرية)

حيث تعرض الحالات في الخاصية (Text State)

و ستجدون التعديلات في الملف المرفق

أخيكم..أحمد بوجلاوي

ArabText.rar

اخوي بجلاوي

الاداه هايله

احيك بصراحه

بسم الله الرحمن الرحيم

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

اخي بوجلاوي

الموضوع رائع ،،،،،

وبعد اذنك اريد ان اضيف لهذه الاداة امكانه تحديد اللغة هل هي عربي او انجليزي وذلك باضافة الكود التالي الى myText

    Enum Language
        Arabic
        English
    End Enum
    Private mlanguage As Language
    Property LanguageState() As Language
        Get
            LanguageState = mlanguage
        End Get
        Set(ByVal Value As Language)
            mlanguage = Value
        End Set

    End Property

    Private Sub MyText_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.GotFocus
        Select Case mlanguage
            Case Language.Arabic
                InputLanguage.CurrentInputLanguage = InputLanguage.InstalledInputLanguages(1)
            Case Language.English
                InputLanguage.CurrentInputLanguage = InputLanguage.InstalledInputLanguages(0)
        End Select
    End Sub

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

أخي jbsa

بارك الله فيك على هذه الإضافة الطيبة و أرجو من كل عضو إذا كانت لديه إضافة فليقم بإضافتها لكي نستفيد منها جميعاً

أخي jbsa نفع الله بك و بعلمك

بارك الله فيك اخي العزيز ابو جلاوي علي هذة الاداء الرائة

اخوك Games

بسم الله الرحمن الرحيم

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

اخي بوجلاوي

شـــكــــراً لــــــــــــــــــــك ،،،،،، وتقبل فائق تحياتي

8

88

888

8888

88

88

88

88

مشكور أخي الفاضل على الأداة

أشكرك أخي أحمد وجعلها الله في ميزان حسناتك

اقتباس

أشكرك أخي أحمد وجعلها الله في ميزان حسناتك