For Loop Debug

[Tosaka Kawashita]

I was making an invalid character removal module for my program, and here is the function that I used:

Function fix_extensions(file_extension As String)
        'Fixes file extensions
        Dim banned_ext_chars() As String = {"\", "/", ":", ";", "*", "?", """", "<", ">", "|", "%", ",", "#", "$", "!", "+", "{", "}", "&", "[", "]", "•", "'", "."}
        For index As Integer = 1 To banned_ext_chars.Length - 1
            file_extension = file_extension.Replace(banned_ext_chars(index), "")
        Next
        file_extension = "." & file_extension
        Return file_extension
    End Function

However, upon checking the output through a short debug, it appears that the backslash was never filtered out. I've tried many things, but none worked.

Help would be greatly appreciated.

[IanRyder]

Hi,

All collections in VB.NET, including Arrays, are indexed from Zero. Therefore your For Loop is incorrect. It should be:-

For index As Integer = 0 To banned_ext_chars.Length - 1

Hope that helps.

Cheers,

Ian

[Tosaka Kawashita]

Ah, yes. Of course. Just a little carelessness...

[jmcilhinney]

For index As Integer = 1 To banned_ext_chars.Length - 1

What's the index of the backslash in your array of banned characters?