View Full Version : دستور setfucus برای تکس باکس
mohsen_iceman2000
یک شنبه 04 تیر 1391, 01:25 صبح
سلام می خوام وقتی که text2.setfocus بشه کل متن test2 انتخاب بشه کسی بلده ؟؟؟؟؟؟؟؟؟؟
just4froum
یک شنبه 04 تیر 1391, 02:10 صبح
بفرمایید :
Private Sub Text1_Click()
SendKeys "{home}"
SendKeys "+{end}"
End Sub
Private Sub Text1_GotFocus()
SendKeys "{home}"
SendKeys "+{end}"
End Sub
star_star
یک شنبه 04 تیر 1391, 08:04 صبح
بفرمایید :
Private Sub Text1_Click()
SendKeys "{home}"
SendKeys "+{end}"
End Sub
Private Sub Text1_GotFocus()
SendKeys "{home}"
SendKeys "+{end}"
End Sub
آقا Erorr میده !!!!!!
سید حمید حق پرست
یک شنبه 04 تیر 1391, 08:56 صبح
سلام علیکم
با اجازه اقای just4froum (http://barnamenevis.org/member.php?211054-just4froum)
کد اقای just4froum (http://barnamenevis.org/member.php?211054-just4froum) هیچ مشکلی ندارد و به درستی کار میکند
سورس ضمیمه شد
موفق باشید
یا علی (ع)
Veteran
یک شنبه 04 تیر 1391, 12:18 عصر
Private Sub Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End Sub
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.