كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟

اذهب الى الأسفل

 كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟ Empty كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟

مُساهمة من طرف Microformt في الثلاثاء مارس 04, 2014 3:06 pm

الاخوه الكرام
 السلام عليكم ورحمة وبركاته
 كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟
 نامل من الله المساعده
 والله يحفظكم ويرعاكم
Microformt
Microformt
.....
.....

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

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

 كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟ Empty رد: كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟

مُساهمة من طرف أحمد مناع في الثلاثاء مارس 04, 2014 3:28 pm


الجواب هنا اخى الكريم

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

ـــــــــــــــــــ التوقيع ــــــــــــــــــــ
سبحان الله وبحمدة .....سبحان الله العظيم
أحمد مناع
أحمد مناع
.
.

تاريخ التسجيل : 15/02/2011
المساهمات : 967
النقاط : 201747
التقيم : 116
الدولة : مصر
الجنس : ذكر

http://egy-tech.forumegypt.net

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

 كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟ Empty رد: كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟

مُساهمة من طرف Microformt في الثلاثاء مارس 04, 2014 6:38 pm

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] كتب:
الجواب هنا اخى الكريم

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]
اخي العزيز احمد مناع
 السلام عليكم ورحمة وبركاته
 ممكن ذلك على ذلك حتى افهم اكثر عليك ؟؟
Microformt
Microformt
.....
.....

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

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

 كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟ Empty رد: كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟

مُساهمة من طرف أحمد مناع في الثلاثاء مارس 04, 2014 7:40 pm

أخى الكريم كل ما عليك فعلة هو كتابة الكود التالى فى اى مكان فى صفحة كتابة الكود
الكود:

Sub SelectAllText(tb As TextBox)
  tb.SelStart = 0
  tb.SelLength = Len(tb.Text)
End Sub

بعد ذلك حدد مربع النص المراد تحديد نصه عند تركيز المؤشر علية وفى حدث التركيز GotFocus أكتب الكود التالى :

الكود:
 SelectAllText Text1

ليصبح الكود كما يلى :

الكود:
Private Sub Text1_GotFocus()
  SelectAllText Text1
End Sub

حيث أن Text1 هو مربع النص المراد تظليل النص الموجود به

ـــــــــــــــــــ التوقيع ــــــــــــــــــــ
سبحان الله وبحمدة .....سبحان الله العظيم
أحمد مناع
أحمد مناع
.
.

تاريخ التسجيل : 15/02/2011
المساهمات : 967
النقاط : 201747
التقيم : 116
الدولة : مصر
الجنس : ذكر

http://egy-tech.forumegypt.net

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

 كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟ Empty رد: كيف اضلل النص المكتوب في text عند إدخل الموشر دخل text ؟؟

مُساهمة من طرف Microformt في الأربعاء مارس 05, 2014 7:49 am

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط] كتب:أخى الكريم كل ما عليك فعلة هو كتابة الكود التالى  فى اى مكان فى صفحة كتابة الكود
الكود:

Sub SelectAllText(tb As TextBox)
 tb.SelStart = 0
  tb.SelLength = Len(tb.Text)
End Sub

بعد ذلك حدد مربع النص المراد تحديد نصه عند تركيز المؤشر علية وفى حدث التركيز GotFocus أكتب الكود التالى :

الكود:
 SelectAllText Text1

ليصبح الكود كما يلى :

الكود:
Private Sub Text1_GotFocus()
 SelectAllText Text1
End Sub

حيث أن Text1 هو مربع النص المراد تظليل النص الموجود به
اخي العزيز : احمد مناع
 السلام عليكم ورحمة وبركاته
 لك مني جزيل الشكر والتقدير على ما تقدمه لنا من دعم فني والله يحفظكم ويرعاكم
Microformt
Microformt
.....
.....

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

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

الرجوع الى أعلى الصفحة

ََ

مواضيع ذات صلة


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