Кнопки рядом с курсором - VB

Узнай цену своей работы

Формулировка задачи:

Даже не знаю, как правильно сформулировать вопрос, но я попробую: Например, пользователь жмет на Command1 . Справа снизу от курсора должны появиться (так скажем, хотя это несколько некорректно) "кнопки", но не Commandы, а пункты, как в меню, которое можно создать в встроенном редакторе меню. Решения через Msgbox и/или созданием новой формы не подходят.

Решение задачи: «Кнопки рядом с курсором»

textual
Листинг программы
Option Explicit
Dim XCur As Single
Dim YCur As Single
 
Private Sub Form_Click()
 Me.PopupMenu а, 0, XCur, YCur
End Sub
 
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
 XCur = X
 YCur = Y
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 4.133 из 5
Похожие ответы