VB小技巧文本框中屏蔽系统右键菜单&用自定义菜单代替自带右键菜单

最新推荐文章于 2021-02-09 21:58:59 发布

miaozk2006

最新推荐文章于 2021-02-09 21:58:59 发布

阅读量1.2k

点赞数

本文链接：https://blog.csdn.net/miaozk2006/article/details/82422149

版权

这篇博客分享了如何在VB编程中屏蔽文本框的系统右键菜单，并介绍了如何用自定义菜单来替代。文章列举了多个VB相关的实用技巧，包括读取TextBox数据、禁止特定快捷键、文件操作、窗体控制、系统功能模拟等，为VB开发者提供了丰富的参考资料。

摘要由CSDN通过智能技术生成

’txtList是textbox控件，pop2是自定菜单名

Private Sub txtList_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = vbRightButton Then

txtList.Enabled = False

txtList.Enabled = True

PopupMenu POP2

End If

End Sub

VB部分相关文章推荐

※VB快速读取 TextBox 第 N 行的资料

※VB禁止使用 Alt-Tab 或 Ctrl-Alt-Del

※生成迷宫的程序

※另一方法转换大小写

※VB控件注册 - 利用资源文件将dll、ocx打包进exe文件

※VB利用资源文件进行工作

最低0.47元/天解锁文章

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

miaozk2006

关注关注

0
点赞
踩
2

收藏

觉得还不错? 一键收藏
0
评论
复制链接

分享到 QQ

分享到新浪微博

扫一扫

VB 全局热键

miaozk2006的专栏

08-09

350

新建立一个FORM~ Private Sub Form_Load() Dim ret As Long preWinProc = GetWindowLong(Me.hwnd, GWL_WNDPROC) ret = SetWindowLong(Me.hwnd, GWL_WNDPROC, AddressOf Wndproc) idHotKey = 1 Modifiers ...

vb屏蔽文本框点右键时的弹出菜单

miaozk2006的专栏

01-06

731

----------以下代码在模块程序代码：　 Option Explicit Public Declare Function SetWindowLong Lib "user32" Alias _ "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, _ ByVal dwNewLong As Long) A...

参与评论您还未登录，请先登录后发表或查看评论

【引用】在VB6.0中实现弹出式菜单的几种方法

miaozk2006的专栏

05-11

5437

在Windows应用程序中，利用弹出式菜单（Pop-up Menu）是增加软件易用性的一个重要方式。本文将向大家介绍在VB6.0中实现弹出式菜单的几种方法。利用VB6.0内置的PopupMenu方法 PopupMenu方法（Method）是VB6.0内置的实现弹出式菜单的方法，用于在MDIForm或Form等对象中的鼠标点位置或指定位置显示弹出式菜单。其语法为：Object.Popu...

VB屏蔽TextBox的右键

键盘上的舞指

02-09

270

添加一个标准模块，代码如下： Option Explicit Public OldProc As Long Public Const GWL_WNDPROC = (-4) Public Const WM_CONTEXTMENU = &H7B& Declare Function SetWindowLong Lib “user32” Alias “SetWindowLongA” _ (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLon

VB6判断窗体是否是活动的.txt

07-05

VB如何检测一个窗体是否是打开的状态呢? 如果窗体是否处于显示状态，通过Visible属性辨别如何判别窗体已载入，但未必显示。可以在forms集合中搜索一下是否存在指定窗体。

太极图VB源代码

03-30

太极图VB源代码。用VB编写的简易太极图。

VB中屏蔽TextBox的右键菜单

04-05

在用VB编程时，我们可能需要通过对TextBox的KeyPress、KeyDown编程来实现限制输入，如只能输入数字、字母等，但是通过鼠标右键的粘贴功能却可以使你的代码功亏一篑，本例将演示如何通过调用API屏蔽TextBox的右键功能。

VB中禁止文本框右键菜单

11-28

VB中禁止文本框右键菜单,解决了VB6本身控件无法设定右键关闭的功能。

VB 小技巧自定义TextBox文本框右键菜单

miaozk2006的专栏

02-10

1442

'TextBox单击鼠标右键总是跟出来一个系统默认的关于文本操作的菜单，如何把它去掉？请看如下代码。 Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then Text1.Enabled = False ...

VB6.0_屏蔽TextBox右键菜单

09-15

VB6.0_屏蔽TextBox右键菜单 VB6 屏蔽TEXT右键菜单

VB实现屏蔽文本框右键菜单的复制、粘贴等功能的方法

09-04

主要介绍了VB实现屏蔽文本框右键菜单的复制、粘贴等功能,是非常实用的一个功能,需要的朋友可以参考下

VB编程中热键应用一例(3KB)...

10-07

VB之控制技术精彩编程-VB编程中热键应用一例(3KB)

VB为窗体设置热键的程序示例

05-12

内容索引:VB源码,界面编程,热键　　这是一个为使用vb为窗体设置热键的一个实例，这个程序中将定义该窗体热键为Ctrl+Alt+Z。代码简单，入门者也能看得懂，编译运行图如上。

VB keypress事件中键盘上每个键的KeyAscii值

10-20

\VB keypress事件中键盘上每个键的KeyAscii值

VB自定义窗体右键菜单，可使用图标

05-03

内容索引:VB源码,界面编程,右键菜单,自定义窗体　VB自定义窗体的右键菜单，在菜单中您可以使用GIF/BMP等图标资源文件，并且响应鼠标的OnMouseOVER动作，实例虽然不漂亮，但是知道了原理你就可以做出漂亮的菜单来。

vb6屏蔽鼠标右键菜单

weixin_30322405的博客

01-04

321

'模板------------------ Option Explicit Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hWnd As Long, ByVal Msg As Long, ByVal wParam ...

用VB如何编写无窗口系统热键程序

lyserver的专栏

07-11

4713

用VB如何编写系统热键程序，网上有很多现成代码，但大都使用了窗口，即使这个窗口根本没有用。其实，如果只是要在某个热键中处理某件事件，根本不需要创建窗口，也无需借助窗口子类化。本文以获得当前IE页面中Body里的HTML文档为例，具体演示了如何编写一个无窗口的系统热键程序，需要说明的是，由于MsgBox函数中字符串的长度限制，可能会显示HTML文档不完整。具体代码如下：Option Ex

太极图绘制

幸福诗歌的博客

04-29

808

<!DOCTYPE html> <html lang="en"> <head> <meta charset="UTF-8"> <title>太极八卦图</title> <style> .outer{ width: 200px; height: 400px; border:1px solid

vb6编写的shell外壳右键菜单在64位系统

VB小技巧 文本框中屏蔽系统右键菜单&用自定义菜单代替自带右键菜单

VB小技巧文本框中屏蔽系统右键菜单&用自定义菜单代替自带右键菜单