Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim path As String = "C:\Windows\Internet Logs\"
Dim di As New System.IO.DirectoryInfo(path)
Dim fi() As System.IO.FileInfo = di.GetFiles("*.txt")
For a As Integer = 0 To fi.Length - 1
ListBox1.Items.Add(fi(a).Name)
Next
End Sub