انتخاب اتوماتیک مقدار یک فیلد

[hf.farhadi]

با سلام خدمت همگی دوستان

من میخوام جهت تغییر داده های یک فیلد ، هنگام بدست آوردن فوکوس مقدار آن فیلد به صورت انتخاب شده در بیاید و دیگه لازم نباشه با موس این کار رو انجام بدی

با چه کدی میشه این کار رو انجام داد

[Younestalebi]

FiledName.SetFocus

[hf.farhadi]

دوست عزیز من میخوام با کلیک کردن فوکوس رو منتقل کنم . در این حالت SetFocus جوابگو نیست و داده ها از حالت انتخاب خارج میشه

وقتی که جهت رفتن به فیلد بعدی از کلید Enter استفاده میکنیم . دقیقاً مقادیر هر فیلدی در حالت انتخاب هست . حالا در یکی از فیلدهام نیاز دارم که از طریق کلیک کردن هم به همین شکل باشه و مقادیر در حالت انتخاب باقی بمونه تا مقدار جدید جایگزین اون بشه

[mehdi_fiz]

سلام دوست عزیز
در رویداد کلیک فیلد مورد نظر کد زیر رو بنویسید

Private Sub Text3_Click()
With Me.Text3
.SetFocus
.SelStart = 0

.SelLength = Len(Me.Text3)
End With

End Sub

موفق باشید