PDA

View Full Version : به پایان رسیدن لیست باکس



xrezax
سه شنبه 22 اسفند 1391, 09:41 صبح
دوستان چطور بفهمم که لیست به پایان رسیده.
یعنی وقتی یکی یکی اطلاعاتو از لیست باکس که می خونم و همینجوری میرم پایین . وقتی به پایین رسید به ارروری بده برنامه بگه پایان

amin32
سه شنبه 22 اسفند 1391, 10:43 صبح
اگه منظورتون رو درست متوجه شده باشم , میتونید از این کد استفاده کنید:


If List1.ListIndex = List1.ListCount - 1 Then
MsgBox "End of List"
End If