Code:
   
Public Function AutoNum(tbl As String, fld As String, frmat As String, midStart As Integer) As String
 
Dim AutoNumRec As New ADODB.Recordset
    AutoNumRec.Open "Select " & fld & " from " & tbl & " order by " & fld, con, adOpenDynamic, adLockOptimistic
    
    Dim NNum As String
    Dim LNum As Integer
    
    If Not AutoNumRec.EOF Then
        AutoNumRec.MoveLast
        LNum = Val(Mid(AutoNumRec.Fields(fld), midStart))
        NNum = frmat & Format(LNum + 1, "0000")
    Else
        NNum = frmat & "0001"
    End If
    
    AutoNum = NNum
    AutoNumRec.Close
End Function
Does anyone knows how to Generate Autonumber in C#? I'm using this one but on VB6 can anyone can convert this into C#, Thanks