تغییر دادن زبان صفحه کلید
دو دکمه فرمان (Command1 , Command2 ) روی فرم قرار دهید . از منوی View گزینه Code را بزنید تا پنجره کدها باز شود. سپس کدهای زیر را در پنجره کدها بنویسید:
Private Declare Function LoadKeyboardLayout Lib "user32.dll" Alias "LoadKeyboardLayoutA"(Byval pwszKLID as String , ByVal Flags as long ) as Long
Private Sub Command1_Click
LoadKeyboardLayout "00000429" , 1
End Sub
Private Sub Command2_Click
LoadKeyboardLayout "" , 1
End Sub
در قطعه کد بالا با زدن دکمه فرمان ۱ (Command1)زبان صفحه کلید فارسی میشود و بازدن دکمه فرمان۲ زبان صفحه کلید به انگلیسی مبدل میشود.
+ نوشته شده در ساعت توسط حسن سامی نسب
|
