Sub SetUserAgent(UserAgent As String)
Dim NaObj As NativeObject = Me
NaObj.RunMethod("SetUserAgent:",Array(UserAgent))
#If Objc
-(void)SetUserAgent:(NSString*)UserAgent{
NSDictionary *dictionary = [NSDictionary dictionaryWithObjectsAndKeys:UserAgent, @"UserAgent", nil];
[[NSUserDefaults standardUserDefaults] registerDefaults:dictionary];
}
#End if
End Sub