Probablemente puedas solucionarlo con el objeto screen, que te ofrece dos útiles propiedades:
screen.width
screen.height
Podrías hacerte una función del tipo
Código:
sub centraForm (byval cual as form)
cual.left=(screen.width-cual.width)/2
cual.top=(screen.height-cual.height)/2
end sub