Attribute VB_Name = "DSMoudle"
Public Type Bucket
    mArr() As Integer
    mCount As Integer
End Type

Public Type setPoint
    x As Integer
    y As Integer
    elementNum As Integer
End Type