PDA

View Full Version : سوال: فراخوانی کد برای اجرای شماره ردیف



m2326499
پنج شنبه 07 دی 1396, 22:09 عصر
سلام خدمت همه استاتید و بزرگواران

چطور میتونم با استفاده از ماژول ، شماره ردیف رو فراخوانی و در فرم ، ثبت کنم . البته من یک کد پیدا کردم ولی متاسفانه نمیدونم چطور باید از اون استفاده کنم. ممنون از راهنمایی سروران عزیز


147357

Private lngRowNumber As Long

Public Function ResetRowNumber() As Boolean
lngRowNumber = 0
ResetRowNumber = True
End Function

Public Function RowNumber(UniqueKeyVariant As Variant) As Long
lngRowNumber = lngRowNumber + 1
RowNumber = lngRowNumber
End Function

نوشیروانی
پنج شنبه 07 دی 1396, 22:52 عصر
سلام
کافیست توفرم در حالت دیزاین =RowNum([Form]) بنویسید
ببینید ازنمونه زیر می تونید کمک بگیرید.
اگه مشکلی داریدفابل تون بذارید تا اصلاح کنم.

m2326499
جمعه 08 دی 1396, 00:34 صبح
ممنون جناب نوشیروانی عزیز

بسیار عالی بود :تشویق::چشمک::تشویق: