audiolevel & color depth

I need to get the following using VB:

1) the current Volume Control level

2) The maximum resolution and color depth supported by the user
system



Thanks