Нужна помощь в коде Visual Basic.

Код легкий но не могу разобраться с одним местом. А именно:
Dim OldX As Single
Dim OldY As Single
Private Sub Form_Load()
Picture1.ScaleMode = vbPixels
Picture1.AutoRedraw = True
Picture1.DrawWidth = 3
Picture1.ForeColor = &H8000&
End Sub
Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
OldX = X
OldY = Y
End Sub

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.CurrentX = X
Picture1.CurrentY = Y
If Button = 1 Then
Picture1.Cls
Picture1.Circle Step(OldX, OldY), Sqr((X - OldX) ^ 2 + (Y - OldY) ^ 2), &H8000& \ вот это место ни ка не пойму каким образом он вычисляет координаты
Center = Sqr((X - OldX) ^ 2 + (Y - OldY) ^ 2) / радиуса кто знает объясните или дайте формулу
End If
End Sub

И ещё что за Center? В списке переменных я его не заметил, а в опциях данного события я не помню такого.