读书人

MSFlexGrid滚动条有关问题

发布时间: 2012-01-19 20:57:58 作者: rapoo

MSFlexGrid滚动条问题
怎样知道按下的是MSFlexGrid控件滚动条的上按钮还是下按钮?

[解决办法]
Option Explicit

Dim x
Private Sub Form_Load()
Dim i
For i = 1 To 2000
M.AddItem i
Next
x = M.TopRow
End Sub
Private Sub M_Scroll()
If M.TopRow < x Then
Debug.Print "上 "
Else
Debug.Print "下 "
End If
x = M.TopRow
End Sub

读书人网 >VB

热点推荐