bz9さんの
>この2つを組み合わせれば、トラックバーさんのやりたいことが実現できるかと思います。 
を実際にやってみると次のようになります。

Private Sub TrackBar1_Scroll(sender As System.Object, e As System.EventArgs) Handles TrackBar1.Scroll



    ProgressBar1.Value = TrackBar1.Value



End Sub

TrackBar、ProgressBarの最小値・最大値を一致させないとエラーになるとおかしな動きになってしまうので、この例ではTrackBarのMaximumプロパティを100に設定しています。