View Full Version : سوال در مورد textbox فارسی
kablayi
شنبه 15 مرداد 1384, 01:02 صبح
چطور میتونم یه تکست باکس فارسی داشته باشم که به طور پیش فرض فارسی باشه و احتیاج به فارسی کردن(ALT+SHIFT) نباشه ... ممنون
mehrdotnet
شنبه 15 مرداد 1384, 13:20 عصر
سلام
هر جایی که دوست داشتی مثلا لود فرم اینو بگذارش :
Dim myCulture As New Globalization.CultureInfo("fa-IR")
Dim mylanguage As InputLanguage
InputLanguage.CurrentInputLanguage = mylanguage.FromCulture(myculture)
kablayi
دوشنبه 24 مرداد 1384, 11:01 صبح
اگر خواستیم یه تکس باکس فارسی باشه یکی انگلیسی چیکار کنم؟
Mohammad .net
دوشنبه 24 مرداد 1384, 12:48 عصر
باید وقتی اون 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
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.