View Full Version : فارسی کردن کیبورد در...
twelve
دوشنبه 04 تیر 1386, 23:27 عصر
:خجالت: سلام ، من میخوام به محض focus شدن روی text box ، صفحه کلید فارسی بشه تا نیازی به تغیر زبان نباشه ، چطور باید اینکار رو کنم؟
saeed_rezaei
سه شنبه 05 تیر 1386, 00:17 صبح
سلام
تابع زیر زبان جاری رو واست عوض می کنه.
PublicSub changelanguge(ByVal cl AsString)
Dim lang As System.Windows.Forms.InputLanguage
ForEach lang In System.Windows.Forms.InputLanguage.InstalledInputL anguages
If (lang.Culture.TwoLetterISOLanguageName = cl) Then
System.Windows.Forms.Application.CurrentCulture = lang.Culture
System.Windows.Forms.Application.CurrentInputLangu age = lang
EndIf
Next
EndSub
حالا هر وقت خواستی بری یه زبان دیگه باید دو حرف اول اون زبان رو وارد کنی. برای مثال برای تغییر زبان به فارسی می نویسی:
changelanguge("fa")
و یا تغییر به انگلیسی:
changelanguge("en")
art2000ir
سه شنبه 05 تیر 1386, 19:10 عصر
اگر بخواهیم یک زبان مثل فرانسه را به زبان ها اضاقه کنیم یعنی نصب کنیم چی کار باید کرد ؟
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.