Nelle Queries, meglio di no, ma siccome immagino a te serva in Maschere o, in Report, la risposta è si...
Nelle Maschere, ancorchè continue, basta inserire un Controllo TextBox NON ASSOCIATO a campi ma che richiama una funzione, quindi nell?origine COntrollo scriverai:
=GetRecNum()
Dove la Funzione sopra è questa:
Public Function GetRecNum() As Long
'============================================================
'Name : GetRecNum()
'Purpose :
'Author : Maurizio Borrelli
'Date : 01 febbraio 2002
'Called by :
'Calls :
'Inputs :
'Output : Posizione assoluta del record corrente+1
'============================================================
On Error GoTo erh
With CodeContextObject.RecordsetClone
If Not (.BOF And .EOF) Then
.Bookmark = CodeContextObject.Bookmark
GetRecNum = .AbsolutePosition + 1
End If
End With
ext:
Exit Function
erh:
GetRecNum = 0
End Function
Se ti serve in un report ancora più semplice in quanto basta impostare le proprietà:
Origine controllo: =1
Somma Parziale: Su tutto
Saluti