هل يمكن ان امنع المستخدم من إدخل في text رمز معين ؟؟

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

هل يمكن ان امنع المستخدم من إدخل في text رمز معين ؟؟

مُساهمة من طرف Microformt في الأحد يونيو 08, 2014 2:11 pm

لاخوه الكرام
السلام عليكم ورحمة وبركاته
هل يمكن ان امنع المستخدم من إدخل في text رمز معين ؟؟
مثال ( كيف امنع المستخدم من كتابة في text الرمز التالي $ )
نامل من الله المساعدة والله يحفظكم ويرعاكم
avatar
Microformt
.....
.....

تاريخ التسجيل : 10/11/2013
المساهمات : 91
النقاط : 171
التقيم : 0
الدولة : مصر
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

رد: هل يمكن ان امنع المستخدم من إدخل في text رمز معين ؟؟

مُساهمة من طرف end.sub في الأحد يونيو 08, 2014 3:02 pm

أن تمنع شخص من كتابة حرف معين أعتقد أنها صعبة لكن يمكن أستخدام الدالة Format لتنسيق القيمة المدخلة فى مربع النص كما تريد

فمثلا أذا اردت أن تكون القيمة رقمية فقط بدون أى علامات يمكنك استخدام الصغية التالية :

الكود:
Me.Text1.Text = Format(Me.Text1.Text, "#####")


أما اذا اردت أن تكون القيمة المدخلة رقمية مع وجود علامة عشرية يمكنك استخدام الكود التالى :

الكود:
Me.Text1.Text = Format(Me.Text1.Text, "#####.##")

أما اذا اردت ان تكون القيمة المدخلة تحتوى على بعض الكلمات مع الارقام وليكن علامة اليورو € بدلا من الدولار  فتكون على النحو التالى :

الكود:
Me.Text1.Text = Format(Me.Text1.Text, "€###")

وعلى هذا المنوال يمكنك وضع اى علامة أو كلمة أو ارقام بداخل مربع النص
avatar
end.sub
.....
.....

تاريخ التسجيل : 15/08/2013
المساهمات : 70
النقاط : 131
التقيم : 9
الدولة : مصر
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

رد: هل يمكن ان امنع المستخدم من إدخل في text رمز معين ؟؟

مُساهمة من طرف Microformt في الأحد يونيو 08, 2014 4:41 pm

end.sub كتب:أن تمنع شخص من كتابة حرف معين أعتقد أنها صعبة لكن يمكن أستخدام الدالة Format لتنسيق القيمة المدخلة فى مربع النص كما تريد

فمثلا أذا اردت أن تكون القيمة رقمية فقط بدون أى علامات يمكنك استخدام الصغية التالية :

الكود:
Me.Text1.Text = Format(Me.Text1.Text, "#####")


أما اذا اردت أن تكون القيمة المدخلة رقمية مع وجود علامة عشرية يمكنك استخدام الكود التالى :

الكود:
Me.Text1.Text = Format(Me.Text1.Text, "#####.##")

أما اذا اردت ان تكون القيمة المدخلة تحتوى على بعض الكلمات مع الارقام وليكن علامة اليورو € بدلا من الدولار  فتكون على النحو التالى :

الكود:
Me.Text1.Text = Format(Me.Text1.Text, "€###")

وعلى هذا المنوال يمكنك وضع اى علامة أو كلمة أو ارقام بداخل مربع hod hgu.d.النص
اخي العزيز
 السلام عليكم ورحمة وبركاته
 كانت دورس مفيدة  لك مني جزيل الشكر والتقدير
avatar
Microformt
.....
.....

تاريخ التسجيل : 10/11/2013
المساهمات : 91
النقاط : 171
التقيم : 0
الدولة : مصر
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى