IIS Virtual Directory Name

I am using this code to create a Virtual Directory, but I cannot seem to figure out how to give it a name. When I look in the IIS manager, the box that says Application Name is blank.

VB Code:

Set objVirtualDirectory = objIIS.Create("IISWebVirtualDir", strVirtualDirectoryName)
    objVirtualDirectory.AccessScript = bolScriptPermissions
    objVirtualDirectory.Path = strVirtualDirectoryPath
    objVirtualDirectory.SetInfo

** Bump **