VB - ListView; LabelEdit for SubItems

[dee-u]

I've got this problem, (attached is the screenshot), why is it not fitted exactly? Here is the minor modifications I did so the editing will be triggered after double-click...

Dim xPos As Single, yPos As Single
 
Private Sub ltvListView_DblClick()
    EditText xPos, yPos
End Sub
 
Private Sub ltvListView_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
    xPos = x
    yPos = y
End Sub