Making a scroll screen

[rahul.kul]

Hi Limpit,

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If X < Frame1.Left Then
        Frame1.Left = X
    End If
    
    If X > (Frame1.Left + Frame1.Width) Then
        Frame1.Left = X - Frame1.Width
    End If
    
    
    If Y < Frame1.Top Then
        Frame1.Top = Y
    End If


    If Y > (Frame1.Top + Frame1.Height) Then
        Frame1.Top = Y - Frame1.Height
    End If
    
    
End Sub

try this in a Form with a Frame !

Is this you want or something like that?