이제막 vb프로그램밍을 하고 있습니다.
statusbar에 progressbar의 진행상태를 구현할려고 찾아보고 있습니다.
여러가지 소스가 있던데 다른것은 좀 복잡하고 아래소스가 간단해서 볼려고 했더니 핸들값이란게 표기가 되는데 이 핸들값이란게 이햐가 안되네요
================================================================================' StatusBar에 진행상황을 알려주는 Progress Bar를 넣는 방법
' hProgressBar : ProgressBar의 핸들값, hStatusBar : StatusBar의 핸들값
' CNTLProgressBar : ProgressBar의 이름, CNTLStatusBar : StatusBar의 이름
' nPading : StatusBar의 Panel Pading 값, nPannelNum : Progress 바가 위치할 Statusbar의 Panel Index
'==============================================================================
Public Function StatusInProgressBar( ByVal hProgressBar As Long, _
ByVal hStatusBar As Long, _
ByRef CNTLProgressBar As Control, _
CNTLStatusBar As Control, _
nPading As Integer, _
nPannelNum As Integer)
Call SetParent(hProgressBar, hStatusBar)
CNTLProgressBar.Move CNTLStatusBar.Panels(nPannelNum).Left + nPading, _
nPading, _
CNTLStatusBar.Panels(nPannelNum).Width - nPading * 2, _
CNTLStatusBar.Height - nPading
End Function
|