Sub Page_Load(sender As Object, e As EventArgs)
Dim myDirInfo As DirectoryInfo
Dim arrFileInfo As Array
Dim myFileInfo As FileInfo
myDirInfo = New DirectoryInfo("MyFiles/")
arrFileInfo = myDirInfo.GetFiles("*.txt")
For Each myFileInfo In arrFileInfo
Me.lblText.Text = Me.lblText.Text & (myFileInfo.Name & "<br>")
Next myFileInfo
myDirInfo = Nothing
End Sub