Access΢n
Accessƽ_QQȺ̖84825014    Access_lƽ_dַ̳    gӭ΢Ž~̖AccessoftChu    οվ|ʾ|Y    
λã > g > Access-??/VBA

欧洲杯预选赛今天的 :AccessԶxGetLineNumberһcM

2020ŷޱԤ www.okrxb.com rg:2020-03-01 12:50:07
:ҵACCESS   ID30810  У
ժҪ:GetLineNumberһcM
:

GetLineNumberǼtm矟ώһw@ʾ̖܌ʹ^аlFADOӛ䛼̖@ʾ؄eһX^ȥ

Function GetLineNumber(DataForm As Form)
        On Error Resume Next
    If IsADORecordset(DataForm.Recordset) Then
        GetLineNumber = DataForm.Bookmark(0) 
    Else
        With DataForm.RecordsetClone
            .Bookmark = DataForm.Bookmark
            GetLineNumber = .AbsolutePosition + 1
        End With
    End If
    DataForm.Repaint
End Function



AccessܛWٷQQȺ (Ⱥ̖:596608182) accessԴaW

鿴uՓ(1)

2020/3/1 14:24:12AngelHis
IsADORecordset

luՓuՓ߷ĄuՓһ°

Ñ
ܡa
ȡݣ
 

Ҋ

g

PYԴ

| ՗l | ھͶ | | WվyӋ |