پراپرتی SelStart و SelLength

SelLength :

این پراپرتی تعداد کاراکترهای انتخابی در قسمت تکست باکس یک کمبو باکس را معین می نماید ، از نوع Integer و رنج آن از صفر تا تعداد کاراکترها است ( در قسمت تکست باکس کمبو !!! )

حتما فراموش نشود برای تنظیم یا برگشتی این پراپرتی کنترل باید فوکس داشته باشد پس در کدتون حتما متد SetFocus را بکار ببرید ( Onchange Event ) .

تنظیم این پراپرتی به عددی کمتر از صفر باعث بروز خطا می شود.

SelStart :

این پراپرتی نمایانگر شروع نقطه تکست انتخابی یا موقعیت نقطه درج در صورت عدم انتخاب است 

Integer است و در رنج صفر تا تعداد کل کاراکترها است البته در قسمت تکست باکس کمبو باکس ) پس اینجا فهمیدید که کمبو باکس قسمت هایی دارد شامل تکست باکس ، دراپ باکس و لیست باکس )

مثل پراپرتی بالا حتما فوکس شود از متد SetFocus استفاده کنید

تغییر پراپرتی SelStart انتخاب را کنسل می کند ( همون در جا زدن که قبلا هم گفته شد ) یک نقطه درج در تکست قرار داده و پراپرتی را به صفر تنظیم میکند 

 فرضا  رشته ای دارید که طولانی است و میخواهید با گرفتن ورودی با  جعبه InputBox رشته دیگری را در آن بیابید و بعد از یافتن آنرا مشخص کند با SelLength ( مشخص کردن موقعیت رشته سرچ شده با Instr که عدد صحیحی را بر می گرداند که آنرا در SelStart می گذاریم  )

--------------------------------

Me.Text1.SetFocus

Me.Text1.SelLength=0

Me.Text1.SelStart=Len(Me.Text1)

اگر در تکست باکس کمبو باکس قصد سرچ در لیست باکس آنرا را دارید با Me.Filter ،  از خاصیت Text آبجکت TextBox بهره ببرید گفته شد زمانیکه فوکس از کنترل خارج شود یا بعبارتی فوکس از دست بدهد  خاصیت Value آن تکست باکس مقدار پیدا میکند.

فرضا تکست باکسی دارید که دارای Vertical Scroll است با نوشتن کد زیر در رویداد Enter ، نقطه شروع می شود  نقطه پایان آخرین کاراکتر درج شده ... بعبارتی کرسر به آخرین کاراکتر درج شده میرود .

Event : Enter

Me.Text1.SelStart=Me.Text1.SelLength

SelText:

پراپرتی که متنی  از یک عبارت  رشته ای  انتخابی را برمی گرداند.

اگر متنی انتخاب نشود این پراپرتی حاوی مقدار Null است.این پراپرتی از یک عبارت رشته ای که حاوی متن  انتخابی است استفاده می کند. چنانچه زمان انتخاب متن این پراپرتی تنظیم شود متن انتخابی با تنظیم SelText جدید جایگزین میشود.

حتما باید با SetFocud کنترل فوکس بگیرد فراموش نشود!!!

در رویداد MouseDown  کنترل تکست باکس کد زیر را بنویسید ، متنی بنویسید و Mouse را به سمت پائین فشار دهید در نظرات بنویسید چه اتفاقی رخ میدهد.

With TextBox1
        .SetFocus
        .SelStart = 0
        .SelLength = Len(.Text)
    End With

Textbox.Text Property

زمانیکه کنترل فوکس دارد پراپرتی یا خاصیت Text حاوی دیتای جاری در کنترل TextBox است ؛ خاصیت Value حاوی دیتایی است که آخرین بار ذخیره شده .. زمان انتقال فوکس به کنترل دیگر داده کنترل به روز رسانی یا Update ، و پراپرتی Value به مقدار یا Value جدید تنظیم می شود.

تا زمانیکه کنترل دوباره فوکس نگیرد خاصیت Text در دسترس نیست

اگر از کامند SaveRecord از طریق Docmd استفاده کنید و فوکس نگیرد یا فوکس انتقال نشود دو خاصیت Text و Value مشابه هم تنظیم خواهندشد.