Dim x As Integer
x = Me.Top
MsgBox(x)

Не понял,почему возвращает 116 и 29 постоянно.

Описание: Возвращает или задает расстояние (в точках) между верхней границей элемента управления или верхней границей клиентской области его контейнера.

О каких элементах управления и контейнерах идёт речь вообще ? У меня форма пустая - присутствуют только элементы свернуть,максимизировать и выйти(крестик).