Esto se hace a través de una API. Copia el siguiente código en un módulo
'*********************
Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
' Constantes de la función SetWindowPos
Const SWP_NOSIZE = &H1
Const SWP_NOMOVE = &H2
Const SWP_NOACTIVATE = &H10
Const SWP_SHOWWINDOW = &H40
Const SWP_FLAGS = SWP_NOMOVE Or SWP_NOSIZE Or SWP_SHOWWINDOW Or SWP_NOACTIVATE
'**********************
Luego, para dejar el formulario siempre visible debes hacer lo siguiente
If SetWindowPos(Me.hwnd, -1, 10, 10, 0, 0, SWP_FLAGS) Then
End If
Para dejarlo en estado normal:
If SetWindowPos(Me.hwnd, -2, 10, 10, 0, 0, SWP_FLAGS) Then
End If
Espero que te sirva