Private Sub ScannDLButton_Click(sender As Object, e As EventArgs) Handles ScanDLButton.Clickĭim strInputBox As String = InputBox('Please Swipe/Scan Customer's Driver's License', 'Driver's License') I was able to extract the code from the barcode but when reading the magnetic script from a OHIO drivers license I cannot seem to get the two letter code that prefixes the license number like the PDF417 does.