This example fetches the user information from a Blogger 1.0 service:
Dim b1 As New Blogger1
b1.Login = "MyLogin"
b1.Password = "MyPassword"
b1.ServiceUrl = "http://www.livejournal.com/interface/blogger"
success = b1.GetUserInfo()
If (success = 1) Then
' Display the user info...
List1.AddItem "UserUrl: " + b1.UserUrl
List1.AddItem "UserId: " + b1.UserId
List1.AddItem "FirstName: " + b1.FirstName
List1.AddItem "LastName: " + b1.LastName
List1.AddItem "Email: " + b1.email
List1.AddItem "NickName: " + b1.NickName
Else
MsgBox "Failed to get user info!"
End If