Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: РАСКЛАДКА Добавлено: 12.06.03 16:45  

Автор вопроса:  Миха | Web-сайт: www.visualbasic.boom.ru | ICQ: 394243 
НАдО ОпреДелить раскладку КЛавиатуры , и  вывести msgbox какая раскладка сейчас, но менять не надо

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 Миха



ICQ: 394243 

Вопросов: 20
Ответов: 151
  Web-сайт: www.visualbasic.boom.ru
 Профиль | | #1 		Добавлено: 12.06.03 16:51
Слышал как-то можно через GetKeyboardLayoutName если можно подробнее.

Ответить

Номер ответа: 2
Автор ответа:
 boevik



Хранитель чата

ICQ: 137392264 

Вопросов: 8
Ответов: 557
  Web-сайт: www.hypertech.ru
 Профиль | | #2 		Добавлено: 12.06.03 17:23

Private Declare Function GetKeyboardLayout Lib "user32.dll" (ByVal dwLayout As Long) As Long
Private Declare Function GetKeyboardLayoutName Lib "user32.dll" Alias "GetKeyboardLayoutNameA" (ByVal pwszKLID As String) As Long


Dim strName As String
Const KL_NAMELENGTH = 9
strName = String(KL_NAMELENGTH, 0)
GetKeyboardLayoutName strName
Debug.Print strName

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам