زبان فارسی

[paysokhan]

چطوری می توانم در gride یا textbox و در هر جای دیگری مستقیم تایپ فارسی کنیم بدون اینکه بخواهم برای تبدیل انگلیسی به فارسی دو کلید alt+shift را فشار دهم اگر کد خاصی دارد اساتید و دوستان بزرگوار مطرح بفرمایند.

[rezankh]

چطوری می توانم در gride یا textbox و در هر جای دیگری مستقیم تایپ فارسی کنیم بدون اینکه بخواهم برای تبدیل انگلیسی به فارسی دو کلید alt+shift را فشار دهم اگر کد خاصی دارد اساتید و دوستان بزرگوار مطرح بفرمایند.

ابتدا اين ماژول رو ايجاد كنيد :


Public Declare Function LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal Flags As Long) As Long


سپس


Private Sub Form_Load()

'--------- براي فارسي كردن ----------
LoadKeyboardLayout "00000429", 1

End Sub