如何检测滚动条是否位于richtextbox的末尾(vb.net)
发布时间:2020-12-17 00:04:44 所属栏目:大数据 来源:网络整理
导读:我的问题是这样的:如何检测滚动条是否位于richtextbox的末尾? 编辑:当我说最后我的意思是完全滚动到底部,而不是其他任何地方. 查看 GetScrollRange 和 GetScrollPos API … Private Const SBS_HORZ = 0Private Const SBS_VERT = 1DllImport("user32.dll")
我的问题是这样的:如何检测滚动条是否位于richtextbox的末尾?
编辑:当我说最后我的意思是完全滚动到底部,而不是其他任何地方.
查看
GetScrollRange 和
GetScrollPos API …
Private Const SBS_HORZ = 0 Private Const SBS_VERT = 1 <DllImport("user32.dll")> _ Public Function GetScrollRange(ByVal hWnd As IntPtr,ByVal nBar As Integer,_ ByRef lpMinPos As Integer,_ ByRef lpMaxPos As Integer) As Boolean End Function <DllImport("user32.dll")> _ Public Function GetScrollPos(ByVal hWnd As Integer,_ ByVal nBar As Integer) As Integer End Function // ... Dim scrollMin as Integer = 0 Dim scrollMax as Integer = 0 If(GetScrollRange(rtb.Handle,SBS_VERT,scrollMin,scrollMax) Then Dim pos as Integer = GetScrollPos(rtb.Handle,SBS_VERT) // Detect if they're at the bottom EndIf 笔记: 要确定滚动条是否可见,请调用 要确定滑块可以达到的最大值,请调用 scrollMax - largeChange + 1 (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |