'progressbar position
'命令垫款指定的增量在 dwAddValue 参数中传递的一个进度栏的当前位置。
'该命令时成功它重绘栏以反映新的位置。
'hWndControl： 进度栏的句柄。
'dwAddValue： 相当于添加到位置
Function FF_ProgressBar_IncPos( ByVal hWndControl as HWnd, _
                                ByVal dwAddValue as Long _
                                ) as Long
   
   '  Function returns the current Maximum Range Value
   Function = SendMessage (hWndControl, _    '  Handle To destination Control
                           PBM_DELTAPOS, _  '  Message ID
                           dwAddValue,    _  '  WPARAM = dwAddValue (Amount to Add to Position)
                           0 )               '  lParam = 0; not used, must be zero
End Function

