چطور آخرین اطلاعات رو توی لیست باکس نشون بدم

[Younestalebi]

من توی برنامه ام از لیست باکسها استفاده کردم می خوام بدونم راهی وجود داره که وقتی فرم باز می شه مقدار انتخابی اون لیست باکس آخرین رکوردی از این لیست باکس باشه

[amirzazadeh]

سلام
میتونید در رویداد لود فرم از کدی شبیه به به این کمک بگیرید


Me.List0 = Me.List0.ItemData(Me.List0.ListCount - 1)

[Younestalebi]

سلام
اگه بخوام آخرین رکوردی که ثبت شده انتخاب بشه, مثلاً براساس شماره Autonummber
چه کار باید بکنم.

[ARData]

اگه ليست باکس شما شامل رکوردهايي از همين فرم يا رکورد سورس همين فرم باشد و sort در ليست باکس و فرم جاري بر اساس فيلد باشد . شما با کليک بر روي هرکدام از رکوردهاي ليست باکس فرمتون رجوع مي کنه به همان شماره رکورد .... DoCmd.GoToRecord acDataForm, Screen.ActiveForm.Name, acGoTo, List0.ListIndex + 1

[Younestalebi]

فرمي كه من دارم Unbound مي باشد مي خوام فقط توي ليست باكس رو چك كنه. بعد اينكار رو انجام بده

[mehdi_fiz]

سلام دوست عزيز
در رويداد load فرمتون از كد زير استفاده كنيد

Private Sub Form_Load()

Dim ro As Integer

ro = Me.QuickSearch.ListCount - 1
Me.QuickSearch.SetFocus
Me.QuickSearch.Selected(ro) = True

End Sub

موفق باشيد