PackCnrToLong
(XAPI2000)
Deklaration VB 6.0
Function PackCnrToLong (ByVal S As String) As Long
Deklaration VB.NET
Function PackCnrToLong (ByVal S As String) As Integer
Beskrivning
Packar ihop en sträng med en sifferserie och kontrollnummer
(tex personnummer eller organisationsnummer) till ett 32-bitars
heltal som funktionen sedan returnerar. Funktionen
UnPackLongToCnr kan användas för
att packa upp numret igen. Numret måste vara lagrat i strängen enligt:
"123456-7890"
Returvärden
Funktionen returnerar det packade numret i form av ett heltal. Vid
fel returnerar funktionen 0.
Se även
UnPackLongToCnr |
Exempel
Dim Nr As Long
Nr = PackCnrToLong("670710-1017")
|