In your references check the Registry Access Functions (this uses the regtool5.dll). The in your code you can read a value with the following:
Private Sub Form_Load()
Dim ReadStatus As Boolean
Dim ReadValue As String
ReadValue = ""
ReadStatus = GetKeyValue(HKEY_LOCAL_MACHINE, "Software\NHA\Workload\Settings", "LastUserID", ReadValue)
Debug.Print ReadValue
End Sub