Не потому пути идешь!
Найди функцию определяющую вертикальный и горизонтальный размер экрана в пикселях чтото типа GetScreenWidth() и GetScreenHeight() - в VB обязаны быть такие функции.
Сам когдато на VB писал но когда понял что это полное г больше и не вспоминаю этот позор
или спроси на форуме sql.ru - там ботанов я гребу