Mostrar archivos ejecutables en el directorio Curso de Programación Visual Basic

Lección:

Bibliotecas Adicionales


Ejercicio:

Mostrar archivos ejecutables en el directorio 5


Objetivo:

Cree un programa para mostrar el nombre (pero no la ruta de acceso) de los archivos ejecutables (.com, .exe, .bat, .cmd) en el directorio actual


Código:

Imports System
Imports System.IO
Class DisplayExecutableFiles
    Private Shared Sub Main()
        Dim files As String() = Directory.GetFiles(".")

        For Each file As String In files
            Dim extension As String = Path.GetExtension(file)

            Select Case extension
                Case ".exe", ".com", ".bat", ".cmd"
                    Console.WriteLine(file)
            End Select
        Next
    End Sub
End Class