نقل مؤشر الكتابة إلى مكان محدد؟

[عبدالعزيز محمد]

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

لدينا حقل التاريخ وبه تاريخ مكتوب سابقا وعند الانتقال إليه أود من مؤشر الكتابة أن ينتقل إلى بداية التاريخ (اليوم) لأن التاريخ كالتالي:سنة/شهر/يوم

أي كما في هذا المثال:30/10/2018 فبدلا من تظليل كامل التاريخ أريد من مؤشر الكتابة أن ينتقل إلى أول رقم وهو كما في المثال السابق (3) لأن أكسس عند الانتقال إلى حقل به بيانات يتم تظليل كافة الحقل ثم تختار ما تريده لأجل التعديل وهذه عمليه مملة خاصة عند تعديل البيانات 

نأمل أن يكون المطلوب واضحاً

[kanory]

هل جربت تعديل هذه الخيارات ؟؟؟؟

 

[صالح حمادي]

السلام عليكم

عند حدث عند التركيز للمربع النص ضع هذا الأمر:

Me.txt_date.SelStart = 0
Me.txt_date.SelLength = 1

بحيث txt_date هو اسم مربع النص

السطر الأول يعني بداية التحديث، و القيمة 0 تمثل الحرف الأول و 1 يمثل الحرف الثاني و هكذا..

السطر الثاني يحدد طول التحديد أو عدد الأحرف المحددة.

بالتوفيق إن شاء الله

[Hamdi Edlbi-khalf]

19 دقائق مضت, صالح حمادي said:

السطر الأول يعني بداية التحديث، و القيمة 0 تمثل الحرف الأول و 1 يمثل الحرف الثاني و هكذا..

السلام عليكم

كيف نعبر عن الحقل الأخير ؟

و هل يمكن التحكم باللون التحديد ؟

تم تعديل أكتوبر 22, 2018 بواسطه Khalf

[kanory]

2 ساعات مضت, Khalf said:

كيف نعبر عن الحقل الأخير ؟

ضع هذا الكود ....

Dim tBox As Textbox
Set tBox = Screen.ActiveControl
If TypeOf tBox Is Textbox Then
tBox.SelStart = Len(tBox) - 1
tBox.SelLength = 1
End If