CnrValid                              (XAPI2000)

Deklaration
Function CnrValid (ByVal S As String) As Boolean

Beskrivning
En generell funktion som testar om en sträng med en sifferserie har ett giltigt kontrollnummer sist. Parametern S innehåller sifferserien som ska testas.

Returvärden
Funktionen returnerar True om numret är korrekt eller False om numret är felaktigt.

Se även
CalcCnr, PnrValid, OrgnrValid, BankgiroValid, PostgiroValid


Exempel 

If CnrValid("1234567890") Then
  Label1 = "Sista kontrollsiffran är korrekt!"
Else
  Label1 = "Sista kontrollsiffran är felaktigt!"
End If