Как воспользоваться функцией ShellExecute в VB ?
 

вот как я ей воспользовался в Делфи:
Shellexecute(handle,'open','\',nil,nil,SW_RESTORE);

как это будет выглядеть если перевести на Visual Basic ?

делфи не знаю, но в VB есть функция Shell

lProcID = Shell("c:\MyApp.exe", vbNormalFocus)

поясню немного больше.
в VB она работает вот так например:
Dim Ret
Ret = ShellExecute(hwnd, "Open", "mailto:<shs777@yandex.ru>?Subject=Тест", &H0, &H0, SW_RESTORE)

Но нада вместо мыла и аутлука чтоб он текущий диск открывал.
Непонимаю как реализовать

попробуй

ShellExecute(handle, "open", path_to_folder, &H0, &H0, SW_SHOWNORMAL)

или

ShellExecute(handle, "explore", path_to_folder, &H0, &H0, SW_SHOWNORMAL)

path_to_folder не пойдёт потому что нада текущий диск открыть с которого она запущена
Например C: D: E: ...etc