how to move object in form using VBA in ms access RRS feed

All replies

  • Some very basic code hacked together in a few minutes. My form has a Label: Amount, and a Line for the amount text, and a textbox txtAmount with the string representation of the amount. Then in that textbox' MouseMove event:

    Private Sub txtAmount_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
        If Button = acLeftButton Then
            'Mouse button is down; move the textbox.
            Me.txtAmount.Left = X
            Me.txtAmount.Top = Y
        End If
    End Sub

    -Tom. Microsoft Access MVP

    Saturday, April 6, 2019 8:07 PM