View Full Version : سوال: selectall کردن تکست باکس
علیرضا.ا
دوشنبه 06 خرداد 1392, 10:35 صبح
اگه بخواهیم با کلیک روی یه تکست باکس تمام محتویاتش انتخاب باشه باید چیکار کرد؟!
setroyd
دوشنبه 06 خرداد 1392, 11:22 صبح
Private Sub Text1_Click()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End Sub
nimar9
دوشنبه 06 خرداد 1392, 21:50 عصر
یه سوال دارم چی کار میشه کرد که با کلیک کردن رو تکست باکس متن داخل آن سلکت آل و کپی شود ؟
محسن واژدی
دوشنبه 06 خرداد 1392, 21:59 عصر
یه سوال دارم چی کار میشه کرد که با کلیک کردن رو تکست باکس متن داخل آن سلکت آل و کپی شود ؟
از Clipboard استفاده کنید:
Private Sub Text1_Click()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
Clipboard.Clear
Clipboard.SetText Text1.Text
End Sub
موفق باشید
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.