Hi there,
I've written the following code and it works fine till 'y' hits 9. There it seems to skip the if statements and continue the loop.
Given data:
- b_x and b_y are '4'
- v_x and v_y are declared
- x and y are also looped, but in another sub
I'd appreciate some help on thisCode:'// Define sample area For v_x = (x - b_x) To (x + b_x) For v_y = (y - b_y) To (x + b_y) '// If current pixel coordinate is not negative get the colorvalue If v_x > -1 And v_y > -1 Then If v_x = x And v_y = y Then Else currHex = GetPixel(picOriginal.hdc, v_x, v_y) currRGB = Hex2RGB(currHex) currSample.Average_Red = currSample.Average_Red + currRGB.Red currSample.Average_Green = currSample.Average_Green + currRGB.Green currSample.Average_Blue = currSample.Average_Blue + currRGB.Blue currSample.SampleCount = currSample.SampleCount + 1 pb2.Value = pb2.Value + 1 DoEvents End If End If Next v_y Next v_x![]()




Reply With Quote