is it to long filename?

[elmnas]

Hello people,

I have following button that create a folder on the desktop
also give the folder Volvo_Penta MM-dd-yyyy


but it doesn't create the whole filename why?

see code below

   Private Sub CreateFolLab_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CreateFolLab.Click

        Dim myPath As String = My.Computer.FileSystem.SpecialDirectories.Desktop
        Dim myFile As String = "VolvoPenta"
        Dim strPath As String = IO.Path.Combine(myPath, Now.ToString((myFile) + "MM-dd-yyyy"))

        If Len(Dir(strPath, vbDirectory)) = 0 Then
            MkDir(strPath)
        End If



    End Sub

I get this result


Could someone correct the code?




Thank you in advance