Согласно тому, что я читаю, строка кода:
BreakDown(Full As String, FName As String, PName As String, Ext As String) As Integer
Это должно быть:
Function BreakDown(Full As String, FName As String, PName As String, Ext As String) As Integer
Возможно, с модификатором перед словом Function
, таким как Private
или Public
. Когда код функции завершен, убедитесь, что у вас также есть эта строка:
End Function