如何能在mdiform的statusbar上制作进度条.txt

VB技巧问答10000例 VB技巧问答10000例

于进度条在MDIForm上，其Align属性会被设为2，即在底部对齐，这使得你不太可能实现在Statusbar上放置进度条。解决的办法是在MDIForm上放置一个PictureBox，然后在PictureBox内部放置进度条，让进度条作为PictureBox的子控件。
    另外一个办法是不使用进度条，而将Statusbar的字体大小设为14，而使用下面的代码： 
    Statusbar1.Panels(1) = Statusbar1.Panels(1) & Chr(13) 
    这样的效果也挺象进度条的。 
<END>