انتخاب متن TextBox

[pi_plusplus]

سلام. من یه سوال ابتدایی داشتم اما چون اینجا حتی به سوالای ساده هم با حوصله پاسخ داده میشه آدم خجالت نمی کشه سوالای ساده شو بپرسه و وقتشو بزاره روی مسائل مهمتر.
اگه بخوایم وقتی فوکوس روی Textbox قرار می گیره نوشته های توی اونو بصورت انتخاب شده در بیاریم باید چیکار کنیم؟
یه سوال دیگه من توی همین سایت چند تا نمونه کد برای پیش فرض قرار دادن فارسی به عنوان زبان ورود اطلاعات پیدا کردم اما وقتی تستشون کردم به جواب مورد نظر نرسیدم. میشه راهنمایی کنید؟

[m_zi]

سلام دوست عزیز
1) شما می تونید قبل از دستور Setfocus ذستور ذیل را بنویسید:
text1.selstart=0
text1.sellenght=len(text1.tex)

2) در gotfocus کنترل مورد نظر بنویس :
LoadKeyboardLayout "00000429", 1
و در ابتدای برنامه :
Public Declare Function LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long

[MMR_1344]

برای فارسی نوشتن برنامه های زیادی بود من هم اینو از تو همین سایت از دیگر دوستان گرفتم به هر حال فرستادم بگیری

[safura]

این 2 دستور رو اگه مثلا تو رویداد کلیک یه دکمه بذاری، بعد از کلیک اون، متنtextbox1 انتخاب میشه و کرسر رویtextbox1 می مونه.
TextBox1.Focus()
TextBox1.SelectAll()

[Mohsen6558]

Sub SelectAllText(tb As TextBox)

tb.SelStart = 0
tb.SelLength = Len(tb.Text)

End Sub


Private Sub Text1_GotFocus()

SelectAllText Text1

End Sub

[mormorbaba]

با سلام اينم يه جور ديگه






Text1.SetFocus
SendKeys "{home}+{end}"

[abulfazl]

شما بايد در بخش general فرمتون اين دستور را بنويسيد
Private Declare Function LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long
Const KLF_ACTIVATE = &H1
و بعد از ان در بخش فرم لودت اين دستور را بنويسي
LoadKeyboardLayout "00000429", KLF_ACTIVATE
به همين راحتي