Generics:
(note the 2 uses of the Of keyword in the function return argument and the later declaration. Its purpose is to limit the list to one type of collected object. So instead of having a list with its first member as string type and its 2nd member as integer type, they are all required to be of ASP.HttpProfile type)

Private Function GetProfiles() As List(Of ASP.HttpProfile)
  Dim profileInfos As ProfileInfoCollection = ProfileManager.GetAllProfiles(ProfileAuthenticationOption.All)
  Dim profiles As New List(Of ASP.HttpProfile)
  For Each info As ProfileInfo In profileInfos
    profiles.Add(Profile.GetProfile(info.UserName))
  Next
  Return profiles
End Function