Do you mean, you need a unique iOS device ID?
If your answer = yes Then
Sub GetVendorIdentifier As String
Dim no As NativeObject
no = no.Initialize("UIDevice").RunMethod("currentDevice", Null)
Dim id As Object = no.GetField("identifierForVendor").GetField("UUIDString")
Return id
End Sub
Else If you need a random ID = yes Then
Sub RandomUUID As String
Dim no As NativeObject
Return no.Initialize("NSUUID").RunMethod("UUID", Null).RunMethod("UUIDString", Null).AsString
End Sub
End If