getting filenames and filesize of files through vb.net 2005

Hi,

I have the following vb.net  2005 script for listing files in a directory.

 Private Sub btnSubmit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
        files1 = System.IO.Directory.GetFiles(txtDirectory.Text)
        Dim sw As New System.IO.StreamWriter(txtFileName.Text)
        sw.Write(String.Join(ControlChars.CrLf, files1))
    End Sub

It works find , but how to modify it so that I can get the file size to appear next to the filename on the output like the following:
c:\sometext.txt 16
c:\othertext.txt 45

I think a "tab" between the filename and the filesize would be ok.

Thanks.

Peter