MkDir and VB6 (part 2)

In a previous post I described how Windows handles the MkDir command. In this post I show the actual solution inside VB6. I know I should have done that the first time. Sorry.

So, here it is. We have a directory with our application.
The program consists of a form with a button (Command1):
The code for the form is:
Option Explicit
Dim myDir As String

Private Sub Command1_Click()
myDir = App.Path & "\the longest folder name in XP history"
MkDir myDir
End Sub



Run the program, click the button and you should see your new folder in your application folder. Done.