help

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • firozfasilan
    New Member
    • Feb 2007
    • 42

    help

    please explain the following code


    Me.Picture = LoadPicture(pIB a0)
    Label00 = App.LegalCopyri ght
    File1.Path = pDEmp
    For mI = 0 To Picture10.Count - 1
    Picture10(mI).B ackColor = RGB(pRGBr, pRGBg, pRGBb)
    Next
    For mI = 0 To Label50.Count - 1
    Label50(mI).Mou seIcon = LoadPicture(pIm ag & "zcPointer.CUR" )
    Next
  • hariharanmca
    Top Contributor
    • Dec 2006
    • 1977

    #2
    Originally posted by firozfasilan
    please explain the following code


    Me.Picture = LoadPicture(pIB a0)
    Label00 = App.LegalCopyri ght
    File1.Path = pDEmp
    For mI = 0 To Picture10.Count - 1
    Picture10(mI).B ackColor = RGB(pRGBr, pRGBg, pRGBb)
    Next
    For mI = 0 To Label50.Count - 1
    Label50(mI).Mou seIcon = LoadPicture(pIm ag & "zcPointer.CUR" )
    Next
    1 Loading Picture
    2 Will show Copy right in Label
    3 Loading files in file control with pDEmp path

    For mI = 0 To Picture10.Count - 1
    Picture10(mI).B ackColor = RGB(pRGBr, pRGBg, pRGBb)
    Next

    4 Changing Array picture control back color

    For mI = 0 To Label50.Count - 1
    Label50(mI).Mou seIcon = LoadPicture(pIm ag & "zcPointer.CUR" )
    Next
    5 Changing mouse icon for lables

    totaly this code is for indicate a pirticular Picture box and lable

    Comment

    Working...