Как можно получить последний элемент массива строк в visual basic 6?
Я имею дело с именами файлов с несколькими точками, которые разделены на массив, и я хочу манипулировать только расширением. Следующий код работает, но имеет жесткий код, который я хочу удалить.
Private Sub Form_Load()
Dim aPath() As String
Dim FileName As String
Dim realExt As String
FileName = "A long dotty.file.name.txt"
aPath = Split(FileName, ".")
realExt = aPath(3) ' <-- how to not hardcode?'
MsgBox ("The real extension is: " & realExt)
Unload Me
End Sub