Private Sub Form_Load()
Dim Name As String
Dim Key As String
tHardware.Text = EP_RegHardwareID <<<< This shows Blank text.
If EP_RegLoadAndCheckKey = 1 Then
If EP_RegLoadKey(Name, Key) = 1 Then
tUserInfo.Text = Name
tKey.Text = Key
lbUserInfo.Caption = Name
End If
Else
MsgBox "Register this software to remove message!", vbExclamation
End If
End Sub