سوال در مورد textbox فارسی

[kablayi]

چطور میتونم یه تکست باکس فارسی داشته باشم که به طور پیش فرض فارسی باشه و احتیاج به فارسی کردن(ALT+SHIFT) نباشه ... ممنون

[mehrdotnet]

سلام
هر جایی که دوست داشتی مثلا لود فرم اینو بگذارش :



Dim myCulture As New Globalization.CultureInfo("fa-IR")
Dim mylanguage As InputLanguage
InputLanguage.CurrentInputLanguage = mylanguage.FromCulture(myculture)

[kablayi]

اگر خواستیم یه تکس باکس فارسی باشه یکی انگلیسی چیکار کنم؟

[Mohammad .net]

باید وقتی اون TextBox فوکوس رو بدست می آره زبان رو عوض کنید /-


Dim FarsiCulture As New Globalization.CultureInfo("fa-IR")

Dim EngCulture As New Globalization.CultureInfo("en-US")

Dim mylanguage As InputLanguage
Private Sub TextBox1_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Enter

InputLanguage.CurrentInputLanguage = mylanguage.FromCulture(FarsiCulture)

End Sub

Private Sub TextBox2_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox2.Enter

InputLanguage.CurrentInputLanguage = mylanguage.FromCulture(EngCulture)

End Sub