ディレクトリが存在するか判定 - いぬもあるけばぼうもあるく

<?xml version="1.0" encoding="utf-8"?>
<CodeSnippets
    xmlns="http://schemas.microsoft.com/VisualStudio/2005/CodeSnippet">
  <CodeSnippet Format="1.0.0">
    <Header>
      <Title>ディレクトリが存在するか確認</Title>
      <Shortcut>chkd</Shortcut>
    </Header>
    <Snippet>

      <Declarations>
        <Literal>
          <ID>val</ID>
          <ToolTip>変数名</ToolTip>
          <Default>directory</Default>
        </Literal>
      </Declarations>

      <Code Language="VB">
  <![CDATA[If $val$ Is Nothing OrElse $val$.Trim() = String.Empty Then Throw New IO.FileNotFoundException($val$,"$val$")
      If Not IO.Directory.Exists($val$) Then Throw New IO.FileNotFoundException("Directory : " & $val$, "$val$")]]></Code>
    </Snippet>
  </CodeSnippet>
</CodeSnippets>