Error : Constant expression violates subrange bounds

[shaghayegh_6113]

سلام
من کد زیر رو نوشتم
If (Image2.Tag <> 3) And (TrackBar1.Position Div 1000 in [64..458]) Then
ولی برنامه این Error رو بهم میده
Constant expression violates subrange bounds
و بیشترین عددی رو که اجازه میده به عنوان پایان Range ام انتخاب کنم 255
می شه بگید باید چی کار کنم

[Mohammad_Mnt]

تا اون جایی که من اطلاع دارم، مجموعه ها ( که اینجا [64..458] است ) نمی تونن بیش از 256 عضو داشته باشند. شما بهتره این عبارت را به همون صورت دو تکه انجام بدین.