I would like to ask VB question, here below is my code. One part of my code does not work for situating the cursor whether is outside or inside , can you help me, thanks a lot

ch Form 1 12 x=645 y=1950 O cursor is outside Command1 lut 0 (Picturel.ScaleWidth - 1) / Picture1 Mouse Move Dim r, x0, YO As Integer Private Sub Commandl_Click() Picturel.cls x0 = (Picturel.ScaleWidth - 1) / 2 VO = (Picturel.ScaleHeight 1) / 2 r = Int (Rnd * 200) + 1 Picturel.Circle (x0, yo), r End Sub Private Sub Form_Activate() x0 = (Picturel.ScaleWidth - 1) / 2 yo = (Picturel.ScaleHeight - 1) / 2 r = Int (Rnd * 200) + 1 Picturel.Circle (x0, y0), r End Sub 1 - Sqr (X - Private Sub Picturel_MouseMove (Button As Integer, Shift As Integer, X As Single, Y As Single) r = Int (Rnd * 200) + 1 x0 = (Picturel.ScaleWidth - 1) / 2 yo = (Picturel.ScaleHeight - 1) / 2 x0) (X - x0) + (Y - y0) * (Y - y0) If d