发表评论(0)作者：, 平台：, 阅读：11301, 日期：2000-03-12

自定义Text的pop-up菜单

在 Windows 95, 右击 Textbox 将出现基本的编辑菜单。如果你想改变该菜单，

可将以下的代码放到 Textbox 的 MouseDown 事件中。


If Button = vbRightButton Then

Text1.Enabled = False

Text1.Enabled = True

Text1.SetFocus

PopUpMenu Menu1

End If