شماره ردیف در فرم

[azadich]

با سلام،یه تکست بوکس دارم که به فیلدی متصل نیست حالا چه کدی بنویسم که شماره ردیف را از 1 تا آخر نمایش بده.ممنون

[saeed1234n]

با سلام
دوست عزیز
در conrol source تکس باکستان بنویسید [CurrentRecord]

[azadich]

تشکر.همش یک نوشت کل رکوردها

[abdoreza57]

سلام

ضمن اينكه فك كنم منظورتون ركورد هست نه رديف
یک Text Box در فرم مورد نظر ایجاد کنید و نام اونرو txtRecordCounter بگذارید و کد زیر رو در رویه On Current فرم کپی کنید :

Dim rst As DAO.Recordset
Dim lngCount As Long

Set rst = Me.RecordsetClone

With rst
lngCount = .RecordCount
End With

Me.txtRecordCounter = "رکورد" & " " & Me.CurrentRecord & " از " & " " & lngCount


موفق باشيد

[padide55]

به نظر من بهتره بعد از درست کردن تکست باکس تنظیمات اونرو مطابق شکل زیر انجام بدید .

105481

[Abbas Amiri]

به نظر من بهتره بعد از درست کردن تکست باکس تنظیمات اونرو مطابق شکل زیر انجام بدید .



در مورد ریپورتها جواب می دهد و روش خوبی است ، ولی منظور سوال کننده مشخص نشده که فرم هست یا گزارش ؟

[bemilove]

با سلام خدمت دوستان....اگر مابخواهیم آخرین شماره ردیف رو در گزارش بهمون بده چه کدی استفاده کنیم.[مثلا دو صفحه داریم که آخرین ردیفش عدد 34 است....در تکست باکسی جداگانه میخواهیم که عدد 34 نمایش داده شود چه کدی بنویسیم]