189 8069 5689
我是新手，仅谈谈我的理解，按钮的MouseEnter与MouseLeave事件就可以解决，需要这么复杂吗？
目前成都创新互联公司已为上千家的企业提供了网站建设、域名、网络空间、网站运营、企业网站设计、东乌珠穆沁网站维护等服务，公司将坚持客户导向、应用为本的策略，正道将秉承"和谐、参与、激情"的文化，与客户和合作伙伴齐心协力一起成长，共同发展。
比如当鼠标移入按钮（Button1）时，按钮的字体变色（假如变为红色）可以写为（MouseEnter事件）：
Button1.Forecolor=color.red;
当鼠标移出，字体颜色变回去（假如本来是黄色）（MouseLeave事件）：
Button1.Forecolor=color.yellow;
如要做高级的动态变化，估计添加timer进来，写Timer的Tick事件，比如Tmier每Tick一次，按钮的红色就加5，同时设置按钮的Tick间距。
用TreeView控件，具体方法我不记得了，你可以参照明日科技有限公司的VB1200例第一卷，里面有实例。注：这是树桩列表，不是什么折叠菜单
可以做一个基窗体作为父窗体，父窗体上有左边的菜单栏
然后所有画面都继承这个父窗体，然后所有页面都会有父窗体左边菜单栏了，每个页面内容自己加控件就行 就会显示都右边的
不知你是否理解 不理解可追问 。。。
工具箱里有ContextMenu（.NET2.0以后名字有点变化，大概差不多），你加入窗体后就可以像编辑普通菜单那样编辑。
编辑好后，选中你要添加菜单的控件。属性窗口里有个ContextMenu属性，在里面选你刚才建立的ContextMenu
你好！
Textbox属性中有一个scrollBars的属性，调一下就行了
打字不易，采纳哦！
在代码中加入以下事件代码即可让鼠标滚轮支持VScrollBar：
Private Sub mouse_wheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseWheel
If e.Delta = 120 Then
If VScrollBar1.Value - VScrollBar1.SmallChange = 0 Then
VScrollBar1.Value -= VScrollBar1.SmallChange
ElseIf VScrollBar1.Value - 1 = 0 Then
VScrollBar1.Value -= 1
End If
Else
If VScrollBar1.Value + VScrollBar1.SmallChange = VScrollBar1.Maximum Then
VScrollBar1.Value += VScrollBar1.SmallChange
ElseIf VScrollBar1.Value + 1 = VScrollBar1.Maximum Then
VScrollBar1.Value += 1
End If
End If
End Sub