<?xml version="1.0" encoding="UTF-8"?>
<CodeSnippets xmlns="http://schemas.microsoft.com/VisualStudio/2005/CodeSnippet">
  <CodeSnippet Format="1.0.0">
    <Header>
      <Title>Convertir en caracteres anchos y estrechos</Title>
      <Author>Microsoft Corporation</Author>
      <Description>Convierte en caracteres anchos y estrechos de cadenas.</Description>
      <Shortcut>typeWidth</Shortcut>
    </Header>
    <Snippet>
      <Imports>
        <Import>
          <Namespace>Microsoft.VisualBasic</Namespace>
        </Import>
      </Imports>
      <Declarations>
        <Literal>
          <ID>Wide</ID>
          <Type/>
          <ToolTip>Reemplazar por la cadena de caracteres anchos.</ToolTip>
          <Default>"Wide String"</Default>
          <Function/>
        </Literal>
        <Literal>
          <ID>Narrow</ID>
          <Type/>
          <ToolTip>Reemplazar por la cadena de caracteres estrechos.</ToolTip>
          <Default>"Narrow String"</Default>
          <Function/>
        </Literal>
      </Declarations>
      <Code Language="VB" Kind="method body"><![CDATA[' Convert Wide to Narrow.
Dim nString As String = StrConv($Wide$, VbStrConv.Narrow)
' Convert Narrow to Wide.
Dim wString As String = StrConv($Narrow$, VbStrConv.Wide)]]></Code>
    </Snippet>
  </CodeSnippet>
</CodeSnippets>
