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")

 
  
SamLogic