هیچی نیست. اینقد راحته! اول یه تابع خوشگل می نویسیم:
Public Declare Function LoadKeyboardLayout Lib “user32″ Alias “LoadKeyboardLayoutA” (ByVal pwszKLID As String, ByVal flags As Long) As Long
بعدش یه متغیر گوگولی مگولی تعریف می کنیم:
Dim fa As Long
حالا با کمک اون تابعی که نوشتیم، به متغیرمون مقدار می دیم:
fa = LoadKeyboardLayout(“00000429″, 1)
همین! تموم شد رفت پی کارش :دی
پ.ن.1: وی بی بود ها :)
