تغییر زبان کیبورد در اکسس

• آموزش تغییر زبان کیبورد در اکسس

با یکی دیگر از قسمت های آموزش اکسس با شما علاقمندان همراه هستیم ؛ در این مطلب در خصوص یکی از دغدغه های برنامه نویسان و راه حل آن صحبت خواهیم کرد. مسأله تغییر زبان نوشتاری در برنامه ها ، که قرار است کاربر اطلاعات خود را به زبان فارسی در نرم افزار وارد کند میتواند در نگاه اول چالش برانگیز باشد. چرا که در صورت انگلیسی بودن کیبورد در هنگام ورود به برنامه کاربر بایستی بصورت دستی اقدام به تغییر زبان نماید که این مسأله میتواند زیاد خوشایند نباشد. در ادامه با نحوه تغییر زبان کیبورد در اکسس از طریق کدنویسی در محیط VBA آشنا خواهید شد.

برای آنکه بتوانیم در هنگام ورود کاربر به برنامه زبان کیبورد را بصورت خودکار و بدون آنکه نیاز باشد کاربر این کار را خود انجام دهد ، پیاده سازی کنیم کافی است ابتدا کدهای زیر را در هد صفحه فرم قرار دهید.

Option Compare Database
#If Win64 Then
    Private Declare PtrSafe Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As Long, _
    ByVal flags As Long) As Long
#Else
    Private Declare Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As Long, _
    ByVal flags As Long) As Long
#End If

سپس در رویداد on Load فرم مورد نظر خود تابع زیر را فراخوانی میکنیم.

Call ActivateKeyboardLayout(1, 1)

با پیاده سازی کدهایی که در بالا به آنها اشاره شد ؛ با اجرای فرم ملاحظه خواهید نمود که زبان کیبورد در صورتیکه بشکل انگلیسی باشد ؛ بشکل خودکار به زبان فارسی تبدیل خواهد شد.