Mengetahui Ekstensi File

Ekstensi digunakan untuk memudahkan identifikasi jenis dari suatu file. Misalnya file musik biasanya ber-ekstensi mp3, wav, aac. Sedangkan untuk file gambar ber-ekstensi jpeg, gif.

Berikut fungsi yang digunakan untuk mengetahui atau mengambil ekstensi dari file.

Function Extension(ByVal FileName As String) As String
Extension = Split(FileName, ".")(Len(FileName) - Len(Replace(FileName, ".", "")))
End Function

Contoh penggunaannya :

s = Extension("Lokasi File")