MouseDown Event Help Needed (DataGrid) [RESOLVED]

[JCScoobyRS]

Here is the code I use to initiate a Drag and Drop Sequence:

Private Sub DataGrid1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
    If Button = vbLeftButton Then 'Begins the dragging process
        DataGrid1.DragIcon = QuoteForm.ImageList1.ListImages(6).Picture
        DataGrid1.Drag vbBeginDrag
        IMTextBox.Text = DataGrid1.Text
        QuoteForm.dragging = True
        QuoteForm.Show
    End If
    QuoteForm.txtDragValue = DataGrid1.Text & "_MAT"
End Sub

This works great for Drag and Drop BUT if I need to resize the DataGrid Columns, it doesn't work as VB thinks I'm in the middle of a Drag and Drop. Can someone help me change my code so that I can still use it to Drag and Drop BUT still give my users the ability to resize the columns? Thanks, Jeremy