How can I show the result?

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim Secrets = New ClientSecrets()
        Secrets.ClientId = "Client Id Here"
        Secrets.ClientSecret = "Client secret here"

        Dim scope = New List(Of String)
        scope.Add(DriveService.Scope.Drive)

        Dim credential = GoogleWebAuthorizationBroker.AuthorizeAsync(Secrets, scope, "user", CancellationToken.None).Result()

        Dim initializer = New BaseClientService.Initializer
        initializer.HttpClientInitializer = credential
        initializer.ApplicationName = "Application name here"

        Dim service = New DriveService(initializer)
        Dim request As FilesResource.ListRequest = service.Files.List()
        Dim files As FileList = request.Execute()
    End Sub