Внешний вид/стиль Common Dialog Save/Open - VB

Формулировка задачи:

Если хотя бы посмотреть на картинку в приведенном примере
http://vbnet.mvps.org/index.html?code/hooks/fileopensavedlghooklvview.htm
то станет ясно о чем речь. Выполняю напр. тупо сей пример. Все хорошо, все работает.
На XP, на висте. Но:
Четыре кнопочки наверху, прямоугольные кнопочки, рамочки и т.п. не соответствуют рекламной картинке, которую можно взглянуть по ссылке, т.е. отображаются не в духе/стиле текущей ОС.
От них сильно попахивает девяностыми, а это ведь не самопальный и не VB98г-provided. контрол, а вызов API текущей современной OS. Откуда берутся элементы примитивной графики?
В чем проблема? Как решать?

Решение задачи: «Внешний вид/стиль Common Dialog Save/Open»

textual
                            Листинг программы 
                        

                            <font color="blue">Public</font> <font color="blue">Declare</font> <font color="blue">Function</font> GetOpenFileName Lib <font color="teal">"comdlg32.dll"</font> _
   Alias <font color="teal">"GetOpenFileNameA"</font> _
  (pOpenfilename <font color="blue">As</font> OPENFILENAME) <font color="blue">As</font> <font color="blue">Long</font>
                        