我买的是09年3月出版的VB程序设计标准教程，其中讲到类模块一章，在书上121页，举例ch0702实例位置：mr\07\sl\02   请问该例子其中的一段“声明类模块的方法”，在整体程序中起什么作用的？我尝试将其设置为注释块，程序照样能运行！
Public Sub ClipTo(ToCtl As Object)          '将ClipTo声明为方法
    On Error Resume Next
    Dim tmpRect As RECT
    Dim pt As POINTAPI
    With ToCtl
        If TypeOf ToCtl Is Form Then 
            tmpRect.Left = (.Left \ Screen.TwipsPerPixelX)
            tmpRect.Top = (.Top \ Screen.TwipsPerPixelY)
            tmpRect.Right = (.Left + .Width) \ Screen.TwipsPerPixelX
            tmpRect.Bottom = (.Top + .Height) \ Screen.TwipsPerPixelY
        ElseIf TypeOf ToCtl Is Screen Then                            
            tmpRect.Left = 0
            tmpRect.Top = 0
            tmpRect.Right = (.Width \ Screen.TwipsPerPixelX)
            tmpRect.Bottom = (.Height \ Screen.TwipsPerPixelY)
        Else
            pt.X = 0
            pt.Y = 0
            Call ClientToScreen(.hWnd, pt)
            tmpRect.Left = pt.X
            tmpRect.Top = pt.Y
            pt.X = .Width
            pt.Y = .Height
            Call ClientToScreen(.hWnd, pt)
            tmpRect.Bottom = pt.Y
            tmpRect.Right = pt.X
        End If

        Call ClipCursor(tmpRect)
    End With
End Sub
这段程序嵌套中，ToCtl要么为窗体，要么为屏幕，那else之后的是什么意思？除了窗体和屏幕还有其他的情况出现么？
还有property属性声明中：
Public Property Let X(ByVal vNewValue As Long)
    Call SetCursorPos(vNewValue, Y)
End Property
Public Property Let Y(ByVal vNewValue As Long)
    Call SetCursorPos(X, vNewValue)
End Property
这两段程序起什么作用的？没有它们程序也照样能运行。。请问这里为什么要设定光标的位置？

我刚学的VB，现在还很混乱，请明日科技的老师们，帮忙看看！