Slider für VB verwenden

Kann mir jemand sagen wie ich die Lautstärke, die ich sonst mit dem 
Button Steuer. Die dann
mit einen Slider verwenden kann.so stelle ich die Laustärke im jetzigen 
zustand.


Private Sub Command10_Click()
CDPCX.MSComm1.Output = Chr(&O4) & Chr(&HC0) & Chr(&H15) & Chr(&H15) & 
Chr(&H90) & Chr(&H0)  ' Volume minus

End Sub
aber ich möchte das mit einem schieberegler
scootermann@gmx.de