以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于MouseEnter的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=122517)

--  作者:douglas738888
--  发布时间:2018/7/27 9:52:00
--  关于MouseEnter的问题

请教老师,使用了RichTextBox控件后,想在MouseEnter设置实现鼠标经过时改变Panel颜色进行突出显示

 

下面代码无效,请老师指导,谢谢

 

Dim dp As WinForm.Panel = Forms("登记").Controls("Panel7").basecontrol.Controls("mytxt3")
dp.BackColor = Color.LightCyan


--  作者:有点甜
--  发布时间:2018/7/27 9:55:00
--  

如果要特出panel,这样写

 

e.sender.BackColor = Color.LightCyan

 

如果要特出richtextbox,请给richtextbox绑定mouseenter事件,像textchanged事件那样绑定。


--  作者:douglas738888
--  发布时间:2018/7/27 11:26:00
--  

老师,richtextbox绑定mouseenter事件应该怎样写

 

声明
Public Event MouseEnter As EventHandler (写在全局代码)
用法
Dim instance As RichTextBoxArray

Dim handler As EventHandler

AddHandler instance.MouseEnter, handler(写在AFTERLOAD)


--  作者:有点甜
--  发布时间:2018/7/27 11:32:00
--  

全局代码


Public Sub txt_MouseEnter(sender As Object, e As System.EventArgs)
    msgbox(123)
End Sub

 

 

绑定 http://www.foxtable.com/webhelp/scr/2374.htm