DragOver的問題~~~(編號:3495)

Private Sub Drive1_DragOver(Source As Control,X As Single,
 Y As Single, State As Integer)
If State = 0 Then Source.MousePointer = 12
If State = 1 Then Source.MousePointer = 0
End Sub
If State = 0 Then Source.MousePinter = 12
 是在作甚麼用的呢?