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

最新推荐文章于 2021-02-09 21:58:59 发布
最新推荐文章于 2021-02-09 21:58:59 发布
阅读量1.2k 收藏 2
点赞数
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：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元/天 解锁文章
miaozk2006
关注
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 5443
在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实现屏蔽文本框右键菜单的复制、粘贴等功能的方法
09-04
在VB（Visual Basic）编程中，有时为了特定的需求，我们需要禁用某些控件的功能，比如文本框（TextBox）的右键菜单以及其中的复制、粘贴等操作。本篇文章将详细解析如何通过VB来实现这一功能。 首先，我们要了解VB...
VB6.0_屏蔽TextBox右键菜单
09-15
VB6.0_屏蔽TextBox右键菜单 VB6 屏蔽TEXT右键菜单
VB编程中热键应用一例(3KB)...
10-07
VB之控制技术精彩编程-VB编程中热键应用一例(3KB)
VB为窗体设置热键的程序示例
05-12
内容索引:VB源码,界面编程,热键　　这是一个为使用vb为窗体设置热键的一个实例，这个程序中将定义该窗体热键为Ctrl+Alt+Z。代码简单，入门者也能看得懂，编译运行图如上。
VB keypress事件中键盘上每个键的KeyAscii值
10-20
\VB keypress事件中键盘上每个键的KeyAscii值
vb6使用RegisterHotKey注册全局后台热键响应demo
08-16
本demo演示了使用RegisterHotKey函数注册两个全局后台热键并完成事件响应的完整过程，不包含冗余代码，包含完整的WM_HOTKEY参数解析判断过程。工程并兼容了使用Win32Api.tlb的代码并附赠Win32Api.tlb类型库 本人编写的Win32Api.tlb类型库包含3700余条API函数声明及两万多API常用常量声明和结构体声明，极大的免除了繁琐的复制声明过程
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 4716
用VB如何编写系统热键程序，网上有很多现成代码，但大都使用了窗口，即使这个窗口根本没有用。其实，如果只是要在某个热键中处理某件事件，根本不需要创建窗口，也无需借助窗口子类化。本文以获得当前IE页面中Body里的HTML文档为例，具体演示了如何编写一个无窗口的系统热键程序，需要说明的是，由于MsgBox函数中字符串的长度限制，可能会显示HTML文档不完整。具体代码如下：Option Ex
太极图绘制
幸福诗歌的博客
04-29 814
<!DOCTYPE html> <html lang="en"> <head> <meta charset="UTF-8"> <title>太极八卦图</title> <style> .outer{ width: 200px; height: 400px; border:1px solid
vb6编写的shell外壳右键菜单在64位系统
最新发布
05-12
在64位系统中，VB6编写的Shell外壳右键菜单有可能会遇到一些兼容性问题。这是因为64位系统和32位系统的运行环境有所不同，而VB6是一个32位的程序，可能无法完全兼容64位系统。具体表现包括： 1.入口点错误：64位系统中的DLL文件和API函数可能和32位系统中不同，导致程序无法找到正确的入口点，从而出现错误。 2.引用错误：VB6中使用的一些OCX、DLL等控件可能无法在64位系统中正确引用，使得程序无法正常运行。 3.运行错误：由于64位系统的一些安全限制，VB6程序可能无法执行某些操作，或者执行操作后出错。 因此，在开发和调试VB6 Shell外壳右键菜单时，应顾虑系统位数的不同，建议使用64位的操作系统进行测试，并及时处理兼容性问题，避免出现不必要的运行错误。此外，还可以采用其他开发工具和技术来实现Shell外壳右键菜单的功能，例如C#等现代语言。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值