Declare Function GetConsoleScreenBufferInfo Lib "kernel32" (ByVal hConsoleOutput As Long, lpConsoleScreenBufferInfo As CONSOLE_SCREEN_BUFFER_INFO) As Long
GetConsoleScreenBufferInfo получает информацию о заданном консольном окне.
Смотри пример console.zip