Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Visual Basic .NET Как правильно сделать запрос на выборку записей https://www.cyberforum.ru/ vb-net/ thread1063538.html
Здравствуйте уважаемые. Продолжаю разбираться в БД Access и никак не могу найти ответ на такой вопрос: Как правильно сделать запрос на выборку записей из бд по полю1 с условием что поле2 пустое. ...
Visual Basic .NET Кнопки NumLock и ScrollLock
Нужна помощь с созданием кнопок NumLock и ScrollLock. Заранее спасибо.
Запись текста в файл с заменой Visual Basic .NET
Здравствуйте! Есть несколько чекбоксов, каждому из которых присвоен свой текст, например: Checkbox1.text="Hello1 - Hi". Также есть файл, в котором уже имеется свой текст, надо в него записать в...
Visual Basic .NET Задать отношения (дискретная математика) Здравствуйте. Как реализовать это задание? Проект приложил. https://www.cyberforum.ru/ vb-net/ thread1063169.html
Visual Basic .NET Декартово произведение элементов массивов https://www.cyberforum.ru/ vb-net/ thread1063132.html
Здравствуйте. С клавиатуры вводится параметр m. В TextBox9 выводятся m последних элементов массива А, в TextBox7 выводятся m последних элементов массива B. Преобразовать Содержимое TextBox9...
Visual Basic .NET Использование MsgBox с кнопками "Да" и "Нет"
Доброго всем времени суток! Пишу игрушку и не могу понять, как задать функции для кнопок которые открываются в MsgBox. Например: при нажатии кнопки выход идет проверка условия была ли нажата кнопка...
Создание WPF UserControl в Expression Blend Visual Basic .NET
Доброе время суток. Я недавно начал изучать vb, поэтому имеется ряд вопросов, работаю в Visual Studio 2010 pro. Очень долго искал информацию о реализации списка контактов такого вида (вложение),...
Visual Basic .NET Исправить программу, чтобы матрица вводилась не с TextBox, а с консоли Всем привет, можете ету программу переписать из button и textbox-сами для ввода данных в матрицы, а то у меня не получаеться(( Imports Microsoft.VisualBasic.Interaction Imports System Public... https://www.cyberforum.ru/ vb-net/ thread1062705.html
Visual Basic .NET Перевести код с С# на VB.net https://www.cyberforum.ru/ vb-net/ thread1062379.html
Народ всех С Новым Годом! и помогите перекодить с С# на VB.net сразу говару на developerfusion.com/tools/convert/csharp-to-vb/ был код не работает, тачней одна строчка портит всю картину. Вот код...
Visual Basic .NET Заливка фигур из файла BMP Помогите пожалуйста, я новичок. Есть bmp файл с неизвестной фигурой, её надо залить другим цветом. Как это реализовать? https://www.cyberforum.ru/ vb-net/ thread1062366.html
644 / 472 / 38
Регистрация: 04.11.2013
Сообщений: 1,943
0

Горячие клавиши - Alt + кнопка мыши. Исправить код

05.01.2014, 20:31. Показов 1045. Ответов 4
Метки (Все метки)

Доброго времени!
Есть код для горячих клавиш с использованием библиотеки User32. В оригинале было только Alt+C и Alt+D, попробовал добавить Alt+rButton - не работает:

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Public Class Form1
    Public Const MOD_ALT As Integer = &H1           'Alt key
    Public Const WM_HOTKEY As Integer = &H312       '
     
    Public Declare Function RegisterHotKey Lib "user32" (ByVal hwnd As IntPtr, ByVal id As Integer, ByVal fsModifiers As Integer, ByVal vk As Integer) As Integer
 
    Public Declare Function UnregisterHotKey Lib "user32" (ByVal hwnd As IntPtr, ByVal id As Integer) As Integer
 
    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
        If m.Msg = WM_HOTKEY Then
            Dim id As IntPtr = m.WParam
            Select Case (id.ToString)
                Case "100"
                    MessageBox.Show("You pressed ALT+D key combination")
                Case "200"
                    MessageBox.Show("You pressed ALT+C key combination")
                Case "300"
                    MessageBox.Show("You pressed ALT + RButton mouse button")
            End Select
        End If
        MyBase.WndProc(m)
    End Sub
 
    Private Sub Mouse_Form_FormClosing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles MyBase.FormClosing
        UnregisterHotKey(Me.Handle, 100)
        UnregisterHotKey(Me.Handle, 200)
        UnregisterHotKey(Me.Handle, 300)
    End Sub
 
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        RegisterHotKey(Me.Handle, 100, MOD_ALT, Keys.D)
        RegisterHotKey(Me.Handle, 200, MOD_ALT, Keys.C)
        RegisterHotKey(Me.Handle, 300, MOD_ALT, Keys.RButton)
    End Sub
 
End Class
Alt+C и Alt+D работают нормально, а вот Alt+rButton (правая кнопка Мыши) - ноль внимания. Что не так?

Добавлено через 7 минут
П.С. VisualStudio 2010, win7 x64

Вернуться к обсуждению:
Горячие клавиши - Alt + кнопка мыши. Исправить код
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.01.2014, 20:31
Готовые ответы и решения:

Как сделать горячие клавиши в StripMenu
Как сделать горячие клавиши в StripMenu?

Горячие клавиши для свернутой в трей программы
Привет всем! Подскажите, пожалуйста, какую-нибудь нормальную реализацию вызова моей программы,...

Acer Acpire V3-551G (Windows 8 SL x64) не работает комб. alt+F10 (горячие клавиши восстановления)
Здравствуйте! Ноутбук был изрядно помучен установками различных windows, 7,8 скаченных в сети....

Подключение мыши с помощью прерываний 0х33 - горячие клавиши
Здравствуйте! Я пишу 16 разрядное приложение под ДОС на чистом С с ассемблерными вставками. Делаю...

4
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.