Вызвать меню Windows: натройка громкости каналов и времени

[TiG]

Подскажите пожалуйста, есть ли такие функции, что бы при нажатии кнопки, выводились меню windows громкости и настройки времени поверх программы написанной на vb6.

[TiG]

для виндовс хп профешшинал

[Williams]

sndvol32.exe
timedate.cpl

[TiG]

спасибо

[TiG]

Call ShellExecute(0, "open", "sndvol32.exe", "", "", SW_SHOWNORMAL)
что-то не срабатывает, подскажите пожалса код запуска приложения

[TiG]

VBA.Shell "sndvol32.exe", vbNormalFocus эта строчка сраюотала
VBA.Shell "timedate.cpl", vbNormalFocus а эта к сожалению выдёт ошибку(

[TiG]

вот нашёл, заработло
Private Declare Sub SHRunControlPanel Lib "shell32" Alias "#161" (ByVal szAppletName As Long, ByVal hwnd As Long)

Private Sub Command1_Click()
SHRunControlPanel StrPtr("timedate.cpl"), 0
End Sub