| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 求助 Panel1.HorizontalScroll (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=178778) |
| -- 作者：jackyfashion -- 发布时间：2022/7/20 12:39:00 -- 求助 Panel1.HorizontalScroll 老师： 您 好！ Dim pnl = e.Form.Controls("Panel1").basecontrol Dim k As Integer = pnl.HorizontalScroll.Value \'滚动条的值 msgbox(k) 我要点击滚动条的箭头才能显示 Panel1.HorizontalScroll.Value 我转动鼠标中键，滚动条滚动了，就显示不了Panel1.HorizontalScroll.Value 如果转动鼠标中键，滚动条滚动，就显示Panel1.HorizontalScroll.Value 请教老师，这代码怎样写？ 请老师指教！！！ 谢谢！！！ |
| -- 作者：有点蓝 -- 发布时间：2022/7/20 13:36:00 -- 看看：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=78485&skin=0 |
| -- 作者：客人 -- 发布时间：2022/7/20 14:17:00 -- 谢谢老师！ 我看不懂。 谢谢！！！
|
| -- 作者：jackyfashion -- 发布时间：2022/7/20 14:49:00 -- 老师： 您好！ Dim pnl = e.Form.Controls("Panel1").basecontrol Dim k As Integer = pnl.HorizontalScroll.Value \'滚动条的值 msgbox(k) 鼠标单击滚动条的箭头才会显示滚动条位置的值， 鼠标中键转动，滚动条是可以滚动的，就是显示不了滚动条位置的值，可不可以显示滚动位置的值？ 请老师指教！！！ 谢谢！！！ |
| -- 作者：有点蓝 -- 发布时间：2022/7/20 15:15:00 -- 我测试没有问题，请上传实例说明 |
| -- 作者：jackyfashion -- 发布时间：2022/7/20 18:14:00 -- 老师：您好！ Dim pnl = e.Form.Controls("Panel1").basecontrol Dim k As Integer = pnl.HorizontalScroll.Value \'滚动条的值 msgbox(k) 代码没问题 只是用鼠标中键滚轮转动滚动条时，显示不了 pnl.HorizontalScroll.Value，要点击滚动条的箭头才会显示pnl.HorizontalScroll.Value 我想要用鼠标中键滚轮转动滚动条时也显示pnl.HorizontalScroll.Value
|
| -- 作者：有点蓝 -- 发布时间：2022/7/21 8:47:00 -- 请上传实例说明 |
| -- 作者：jackyfashion -- 发布时间：2023/11/22 22:13:00 -- 老师:您 好! 好久没搞这软件! 请教下老师:可不可以用代码点击panel的滚动条的>号? 请老师指教! 谢谢老师!!!
|
| -- 作者：有点蓝 -- 发布时间：2023/11/23 8:39:00 -- 就是设置AutoScrollPosition 呀， >就是AutoScrollPosition +1， <就是AutoScrollPosition -1
|
| -- 作者：jackyfashion -- 发布时间：2023/11/23 23:12:00 -- 谢谢老师!!! 谢谢!!!
|